bulunduğumuz ayı sheetler üzerinde açma

[blazer2004]

herkese iyi akşamlar arkadaşlar .Elimdeki excel dosyamda 12 aya ait sheet var bunlar ocak,şubat.. diye gidiyor ben bir makro yardımıyla bulunduğumuz aydaki sheet'i açtırabilirmiyim.Tabi bu excel dosyamı açtığımda direk bana bulunduğum ayın sheet'ini açacak.Elinizde örnek veya kod varsa sevinirim.Kolay gelsin.

 

[Ayhan Ercan]

Merhaba Sn blazer2004

Ek Dosyayı inceleyiniz...

Sub auto_open()
syf = Format(Date, "mmmm")
Sheets(syf).Select
End Sub

 

[blazer2004]

çok teşekkür ederim Sayın Ayhan Ercan gerçekten çok işime yaradı.Kolay gelsin başarılar.

 

[Necdet]

Merhaba,

Benimde aklıma gelen çözüm :

Sub auto_open()
Sheets(Month(Date)).Select
End Sub

 

[Ayhan Ercan]

çok teşekkür ederim Sayın Ayhan Ercan gerçekten çok işime yaradı.Kolay gelsin başarılar.

Rica ederim.
Size de iyi çalışmalar.. k::