Sayfa Sekmesİ Gİzleme

[ANTALYA 01]

Merhabalar

Araçlar-Seçenekler-Sayfa sekmeleri İşaret kutucuğu kaldırıldığında Sayfalar gözükmüyor fakat Başka bir kullanıcınında Sayfa sekmesini burdan seçip sayfaları görmesini müdahale etmesini istemiyorum.Bu sayfa sekmelerinin diğer kullanıcılar tarafından görmemesi için ne yapılabilir ?

 

[Levent Menteşoğlu]

Sayfaları aşaıdaki gibi bir kod ile gizlerseniz hiç bir şekilde göremezler. Bu kod örneğin sayfa3 ' gizlemektedir.

sub gizle()
sheets("sayfa3").visible=xlveryhidden
end sub

Tekrar görünür yapmak için,

sub göster()
sheets("sayfa3").visible=true
end sub

 

[ANTALYA 01]

D

Teşekkürler

 

[ANTALYA 01]

s

Şunu merak ediyorum

1-Bütün sayfalar nasıl gizlenir ?
2-Sadece İstediğim sayfa kalsın Diğer hepsi gizlensin ?

 

[Levent Menteşoğlu]

Sadece İstediğim sayfa kalsın Diğer hepsi gizlensin ?

Bunun için bir döngü kurmak yeterlidir. Örneğin kalmasını istediğiniz sayfa adı "sayfa1" olsun,

[LEFT]sub gizle()
for a=1 to sheets.count
if sheets(a).name<>"sayfa1" then sheets(a).visible=xlveryhidden
next
end sub[/LEFT]

 

[ANTALYA 01]

S

Teşekkürler

 

[higzos]

ayrıca bunu "biçim-sayfa-gizle" yoluyla da yapabilirsiniz. yanlız burada ek bir işlem olarak sayfayı gizledikten sonra aynı yöntemle açılacağından "araçlar-koruma-çalışma kitabını koru" yoluyla da çalışma sayfasına müdahale edilmesini engelleyebilirsiniz.

 

[ANTALYA 01]

F

Bunuda öğrenmiş olduk teşekkür ederim.