Kapanışta Sayfaları Otomatik Olarak Gizleme

Kapanışta Sayfaları Otomatik Olarak Gizleme

Kapanışta Sayfaları Otomatik Olarak Gizleme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.

Hazır Kod​

VBA:
Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim Syf As Worksheet
For Each Syf In ThisWorkbook.Worksheets
    If Syf.Name <> "ExcelDepo" Then
  Syf.Visible = xlSheetHidden
    End If
Next Syf

End Sub

Açıklama​

Biz kodları kapanışta kullanacak şekilde hazırladık. Eğer kodlara başka bir şekilde ihtiyacınız olursa, kodu BuÇalışmaKitabı kısmına değil bir Module içine eklemeniz ve başlığını değiştirmeniz yeterli olacaktır.Özellikle "makrolar etkinleştirilmezse" bir uyarı sayfası çıkacak türde ihtiyaçlar için oldukça faydalıdır.

Faydalanılması temennisiyle
 
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst