Inputbox ile tüm sayfaları koruma ve kaldırma kod yardımı

[Believing]

Sayın uzman arkadaşlar,

Ekteki çalışmada "SETTINGS" isimli sayfaya atadığım iki adet buton yardımı ile tüm sayfaları koruma altına alıyor, ihtiyaca göre korumaları kaldırabiliyorum. Sayfaları koruma altına alırken sayfalar içerisinde hücre kilidi açık olan hücreler ile filtre yapılmasına müsaade ediyorum. Yapmak istediğim ise şöyle;
Sayfa koruma şifresini SETTINGS sayfasının "B2" hücresinden almasını
Sayfaları korurken daha önceden şifrelenmiş sayfa kontrolü yapmasını ve uyarı vermesini
Hatalı şifre girişinde "Yanlış şifre girdiniz."uyarı vermesini ve inputbox'ı kapatmasını
Doğru şifre ile tüm sayfaları korumaya alarak "Tüm sayfalar korumaya alındı" mesajı vermesini
Şifre girilirken şifrenin deşifre olmaması için (*****) yıldız karakteri şeklinde görünmesini
Sayfa korumaları kaldırırken de aynı işlemleri yapması için mevcut kodları nasıl revize etmeliyim.
Konuya hakim uzman arkadaşların çok değerli yardımlarını rica ediyorum.

Saygılarımla.
Ömer Ali ÜZÜMCÜ

Örnek çalışma linki:

Coklu_Sayfa_Koruma_Calismasi.xlsm dosyasını indir - download

Coklu_Sayfa_Koruma_Calismasi.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s4.dosya.tc

 

[Believing]

Sayın Uzman Arkadaşlar,

Epey yol almama karşın senaryoları üzerinde sonuç alamadım.
Konuya hakim veya uzman arkadaşların çok değerli yardımlarını rica ediyorum.

Saygılarımla.

 

[Believing]

Sayın Uzman Arkadaşlar,

Epey yol almama karşın senaryoları üzerinde sonuç alamadım.
Eksik kalan senaryolar;
Sayfa koruma şifresini SETTINGS sayfasının "B2" hücresinden almasını
Inputbox' yazdığımız şifre "SETTINGS" sayfasının "B2" hücresindeki şifreyi doğrulamalı
Inputbox ile koruma veya korumayı kaldırma işlemi yaparken, farklı şifre kullanılan sayfa var ise hata mesajı yerine "X sayfasında farklı şifre kullanılmıştır. İşleme devam etmek istiyor musunuz" gibi mesaj alarak işlemin tamamlanması sağlanmalı
Konuya hakim veya uzman arkadaşların çok değerli yardımlarını rica ediyorum.

Saygılarımla.

Örnek Çalışma Linki;

Coklu_Sayfa_Koruma_Calismasi.xlsm dosyasını indir - download

Coklu_Sayfa_Koruma_Calismasi.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s7.dosya.tc

 

[Believing]

Sayın uzman arkadaşlar,

Eksik kalan senaryolar hakkında yeterli değilim.
Benim için kıymetli olan yardımlarınızı rica ediyorum.

Saygılarımla.

 

[Korhan Ayhan]

Deneyiniz.

UserForm kullanılmıştır.

 

[Believing]

Sayın Korhan bey,

Harika olmuş, ellerinize sağlık.
ALLAH sizden ve sevdiklerinizden razı olsun.

Saygılarımla.