Sayfa Koruması Aktif mi ?

[baydeniro]

Merhaba arkadaşlar. Bir excel dosya dosyasında koruma fonksiyonunun aktif olup olmadığı makro kodu veya fonksiyon ile tespit edilebilir mi ?

Yani Sayfa Koruması veya Workbook Koruması veya Makro Koruması veya Dosyanın açılış koruması olup olmadığı ? aktif olup olmadığı ? tespit edilebilir mi ?

Not : Koruma parolası veya şifrenin ne olduğu değil, o an itibarıyla Sayfa, Workbook, Dosya veya VBA koruma altında mı değil mi ?

 

[janveljan]

Aşağıda açma parolası ve sayfa koruması olup olmadığını gösteren kodlar var. Korumalar varsa True değeri gösterir.

Sub Pass()
    MsgBox ActiveWorkbook.HasPassword
    MsgBox ActiveSheet.ProtectContents
End Sub

 

[Levent Menteşoğlu]

Aşağıdaki kodlarda çalışma kitabı ile VB editörünün korumalı olup olmadığını gösterir.

ActiveWorkbook.ProtectStructure
ActiveWorkbook.VBProject.Protection

 

[baydeniro]

Sayın janveljan ve Sayın Levent Menteşoğlu, çok çok teşekkür ederim. Harikasınız !!! Sağlıcakla kalın.