açılışta bulunduğumuz ay ismini içeren sayfanın açılması

[ayhan7tr]

Değerli Arkadaşlar,
Ay isimlerinden oluşan (Nisan 2008 - Mayıs 2008) sayfalarım var, açılışta bulunduğumuz ay isimli sayfayı auto open komutuyla nasıl açtırabilirim, birde o ay isminden sayfa yoksa sayfa_ekle makrosunu otomatik olarak nasıl çagırabilirim.
Teşekkür ederim
Ayhan

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu çalışmanızın ThisWorkbook bölümüne uygulayıp denermisiniz.

Private Sub Workbook_Open()
    On Error GoTo Hata
    AY = Format(Now, "mmmm") & "_" & Year(Now)
    Sheets(AY).Select
    Exit Sub
Hata:
    Call Add_Sheet
End Sub

 

[ayhan7tr]

Sayın Korhan Bey,
Çok güzel çalışıyor. Teşekkür ederim.
Saygılarımla,
Ayhan