Excel de gizlenen sayfayı göstermede sorun!

[adembaşkan]

Merhaba arkadaşlar, örnek çalışmalardan sözlük adında bir dosyayı indirdim ve kendime göre uyarlamak istadim ancak verilerin bulunduğu sayfalar gizli ve sayfayı göster bölümü pasif durumda bunu nasıl çözebilirim?.

 

[hamitcan]

Bu kodu deneyin, bakalım açacak mı ?

Sub nn()
    For i = 1 To Sheets.Count
    Sheets(i).Visible = True
    Next
End Sub

 

[adembaşkan]

Sorun çözüldü.
Teşekkürler.