Gizli Sayfaları Bulma ve Gösterme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub Gizli_Sayfalari_Goster()
Dim Syf As Worksheet
For Each Syf In ThisWorkbook.Worksheets
If Syf.Visible = xlSheetHidden Or Syf.Visible = xlSheetVeryHidden Then
MsgBox Syf.Name & " isimli sayfa gizlenmiştir, Tamam dediğinizde açılacaktır."
Syf.Visible = xlSheetVisible
End If
Next Syf
End Sub
Açıklama
Biz kodda gizlenmiş sayfa olduğuna dair bir Mesaj Kutusu çıkarttık. Siz ilgili kısmı istediğiniz şekilde düzenleyebilirsiniz.Faydalanılması temennisiyle