tarih sabitleme ve sayfa ismini değiştirme

[entropi20]

1)excel i kullanarak bir kasa programı yaptım.Makro yu çalıştırdığımda yeni sayfa oluşturuluyor ve günün tarihi yazıyor(bugün formülü).Bu sayfayı kaydedip ertesi gün sabah tekrar makro yu çalıştırdığımda mevcut günün tarihi yazıyor.(buraya kadar herşey normal) birgün önceki sayfaya gittiğimde o günün tarihide bugünün tarihi olmuş oluyor.Kısacası :makronun çalıştığı zaman ki tarihi A1 hücresine yazmak ve bunun değişmemesini sağlamak.
2)makro çalıştığında oluşan yeni sayfanın ismini 1) deki tarih olacak şekilde yapmam mümkün mü?
yardımcı olursanız çok sevinirim.Hepinize selam ve saygılar

 

[Necdet]

Makro kullanıyorsanız excelde BUGÜN() fonksiyonunu kullanmayıp, makroya yazdırabilirsiniz. Kesin yanıtı almanız için dosyanızı görmek gerek

 

[entropi20]

ilginiz için teşekkürler

dosyayı gönderiyorum yardımcı olursanız sevinirim

 

[Korhan Ayhan]

Selamlar,

Kodunuzdaki aşağıdaki satırı bir sonraki ile değiştirip denermisiniz.

Değişecek kod;

ActiveCell.FormulaR1C1 = "=TODAY()"

Uygulayacağınız kod;

ActiveCell.Value = Date

 

[entropi20]

Çok Teşekkürler cost_control .Gerçekten işe yarıyor.Nasıl teşekkür edebilirim bilmiyorum.Minnettarım
2. madde için yapılabilecek birşey varmı yani A1 hücresindeki tarihin aynı zamanda sayfa ismi olmasını sağlamak

 

[Seyit Tiken]

Şu şekilde deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Sayfa1.Name = [a1]
End Sub

 

[entropi20]

ilginiz için teşekkürler ama..

Şu şekilde deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Sayfa1.Name = [a1]
End Sub

bu kodu kopyalayıp makroya yapıştırdım olmadı yanlışmı yaptım acaba

 

[Seyit Tiken]

Sayfa ismini kontrol edin ve kodu ilgili sayfanın kod bölümüne yapıştırın. A1 hücresindeki veri değişikliği anında sayfa ismine yansır.

 

[entropi20]

2.maddeyi sonunda çözdüm

ihtiyaç duyan arkadaş olursa
ActiveSheet.Select
ActiveSheet.Name = Date
kodlarını kasa makrosuna ilave etsinler
kasa makrosunu her sabah çalıştırdığımda sayfa ismi ve A1hücresi o günün tarihi olmuş olacak. Böylece hergün için tarih yazmak zorunda kalmayacağım
Bu arada seyit tiken arkadaşıma da teşekkür ediyorum

 

[ibrahim858]

eğerli bugün formülünü yazdım yanlız bir sonraki gün tarih değişiyor değişmemesi için yardım tablo yu gönderdim