Sayfa Gizleme Yardımı

[oktay10]

Ustalar Excel hakkında fazla bilgim yok ama öğrenmeye çalışıyorum Ana sayfa hariç diğer sayfaları gizle diye bir makro kaydettim makroyu çalıştırdığımda diğer makrolar çalışmıyor yardım ederseniz sevinirim
KOD:
Sub xlVeryHidden_All_Sheets()
On Error Resume Next
Dim sh As Worksheet
For Each sh In Worksheets
sh.Visible = xlVeryHidden
Next
End Sub

 

[Levent Menteşoğlu]

makroyu çalıştırdığımda diğer makrolar çalışmıyor

Bu cümlenizi biraz açarmısınız, çalışmıyor derken hatamı veriyor? eğer kodlarınızda .select gibi komutlar varsa gizli sayfalarda hata verecektir.

 

[oktay10]

evet kodlar select komutları var benim çalışma kitabımda 5 tane sayfa var ben ana sayfadan bu sayfalara düğme ekledim düğmelerle ilgili kodlarda select komutlu düğmelerle başka sayfayı açmak için başka kod var mı

 

[Levent Menteşoğlu]

örneğin gizli sayfanın adı "sayfa1" olsun bu durumda sayfayı göstermek için aşağıdaki gibi bir satırı kodlarınızın en başına ilave etmeniz gerekir.

sheets("sayfa1").visible=true

 

[oktay10]

teşekkürler şimdi açılıyor fakat ben sayfalara girdiğimzaman onları ana menünün yanına sayfa olarak ekliyor ben öyle olmasını istemiyorum sadece altta ana menü görünsün istiyorum.