Gizli dosyaların açılması

[banaoi77]

Merhaba,
Biçim - Sayfa - Gizle den 80 tane çalışma sayfası gizledim.Ama hepsini göstermem gereken durumlarda tek tek seçmek yerine hepsini seçip açabileceğim kolay biryol var mı acaba.

Şimdiden teşekkürler

 

[AS3434]

Aşağıdaki linkte 8 ve 11 nolu mesajlardaki dosyaları inceleyin.

http://www.excel.web.tr/showthread.php?t=14168&highlight=sayfa+gizle+g%F6ster

 

[Seyit Tiken]

Gerçi sayın AS3434 çözüm linkini vermiş, buda yedek çözüm olsun.

Sub Düğme1_Tıklat()
For s = 2 To Sheets.Count
Sheets(s).Visible = 1
Next
End Sub

Şeklinde deneyebilirsiniz.