sayfa isimlerini gizlemek

[ferhat0606]

yaptığım dosyamda 30-40 adet sayfa ismi var...sayfa1, sayfa2, sayfa3, vss.....
ben bu sayfa isimlerini gizlemek istiyorum..(şifreyle olur, yada olmayabilir.)

bunu yapabilir miyim...
teşk..

 

[Merhum İdris SERDAR]

yaptığım dosyamda 30-40 adet sayfa ismi var...sayfa1, sayfa2, sayfa3, vss.....
ben bu sayfa isimlerini gizlemek istiyorum..(şifreyle olur, yada olmayabilir.)

bunu yapabilir miyim...
teşk..

SHIFT'i basılı tutarak gizlenecek sayfaları seçin. Format / Sheet / hide

Makro ile;

Gizlemek için:

Sub sayfagizle()

For Each sh In ThisWorkbook.Worksheets
If Not sh.Name = "Sheet1" Then sh.Visible = False
Next sh

End Sub

Gizli olanları göstermek için:


Sub sayfagöster()

For Each sh In ThisWorkbook.Worksheets
If Not sh.Name = "Sheet1" Then sh.Visible = True
Next sh


End Sub


"Sheet1" yerine gizlenmiyecek sayfanın adını yazın.



.

 

[ersoyalan]

Merhaba,

inceleyin.

http://www.excel.web.tr/f48/gizle-goster-otomatik-t38654/sayfa2.html


E.ALAN

 

[Yesilyurtlu]

Ustalarım propertus ayarlarından visible ayarlarını -1 yapmam lazımmış yaptım göründü


Hepinize teşekkür ederim