tüm sayfaların parolasını kaldırmak

[ramazan_58]

arkadaşlar ekteki belgede açıklamasını yaptığım sayfaların parolasını tek düğme ile kaldırıp ekleyecek bir kod yazarmısınız.Yardımınıza şimdiden teşekkür ederim.

 

[N.Ziya Hiçdurmaz]

yanıt

Sub parola()
For i = 1 To Sheets.Count
Sheets(i).Protect "1968"
Next
End Sub
Sub parolakaldır()
For i = 1 To Sheets.Count
Sheets(i).Unprotect "1968"
Next
End Sub

 

[ramazan_58]

parola

Hocam çok teşekkür ediyorum emeğine ve yüreğine sağlık

 

[ramazan_58]

selamlar

hocam parola koyarken satırları biçimle,sütunları biçimle,hücreleri biçimle ve otomatik süzü kullan seçöeneklerini içerecek şekilde düzenleyebilirmisin şimdiden çok teşekkür ediyorum

 

[N.Ziya Hiçdurmaz]

yanıt

Sub parola()
For i = 1 To Sheets.Count
Sheets(i).Protect "1968", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowFiltering:=True
Next
End Sub
Sub parolakaldır()
For i = 1 To Sheets.Count
Sheets(i).Unprotect "1968"
Next
End Sub

 

[ramazan_58]

Selamlar

Hocam çok teşekkür ediyorum.

 

[ramazan_58]

Sayfa Parolasını Kaldırma

Arkadaşlar unuttuğunuz sayfasının parolasını bulmak için yukarda hocamın yazdığı kodu çalıştırırsanız sayfa parolasını açmaktadır.Yalnız bir şartla
Sub auto_open ()
End Sub adlı kodun arasına yapıştırmanız lazım.

 

[mehmet13mehmet]

tşk

payşalım için teşekkür ederim

 

[zalatoy]

hocam kodu nereye nasıl yapıştırıyoruz

 

[ramazan_58]

sayın zalatoy Alt+f11 tuşuna basın açılan sayfada modül ekle deyin modülün içine yukardaki kodları pıştırın

 

[zalatoy]

sayın zalatoy Alt+f11 tuşuna basın açılan sayfada modül ekle deyin modülün içine yukardaki kodları pıştırın

hacam dosya ekde acmamız mumkunmu acamadım ben

 

[Korhan Ayhan]

Selamlar,

Sn. zalatoy,

Bu işlem parolası bilinen sayfalar için geçerlidir. Yani birden fazla sayfanın korumasını pratik bir şekilde kaldırmak için yazılmış bir koddur. Sayfa şifrelerinin bilinmesi şartı vardır.

Sizin dosyanız kime aitse o kişiden sayfa koruması parolasını istemeniz gerekmektedir. Forumda şifre kırma paylaşımları yasaktır.

 

[night41]

elinize sağlık