• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Şifreleme Hakkında

Katılım
18 Şubat 2016
Mesajlar
12
Excel Vers. ve Dili
2013 Türkçe
Merhaba Arkadaşlar,

Gizli sayfalarımı göstermek için, yardımlarınızla, ufak bir yazılım yaptım ve çalıştı. Teşekkürler.


Sub SayfaGoster()
Dim a As Integer
For a = 1 To Worksheets.Count
Worksheets(a).Visible = xlSheetVisible
Next a
End Sub



Ancak başka kullanıcılar. "Makro Çalıştır" dediği zaman şifre sormasını istiyorum. Yapmış olduğum yazılımın başına bir şifre sorma bölümü ilave edilebilir mi? Peşinen teşekkürler.

Cihan
 
Geri
Üst