Makro Şifreleme

Excel'de çalışma kitaplarını, sayfalarını koruyabileceğiniz gibi, yazmış olduğunuz bir makronun görüntülenmesini (ve yürütülmesini) istemiyorsanız buun içinde şifre oluşturabilirsiniz.

Çalışma sayfanıza bir komut düğmesi (CommandButton) yerleştirin ve aşağıdaki kod satırlarını ekleyin:

1. İlk olarak, korumak istediğiniz basit bir makro oluşturun.
Range("A1").Value = "Gizli Kod Örneği"
2.Daha sonra,Tools, VBAProjectProperties'itıklayın.

mp1
3. Protection sekmesinde, "Look project for viewing"i işaretleyin ve ikikutucuğa da aynı şifreleri girin.

mp2
4. Ok'a tıklayın.

5. Excel dosyasını kaydedin, kapatın ve yeniden açın. Kodu görüntülemeye çalışın.

Aşağıdaki iletişim kutusu görünecektir:

mp3
Yazdığınızkodu, sayfaya eklediğiniz komut düğmesine (CommandButton) tıklayarak çalıştırabilirsiniz, ancak artık kodu görüntüleyemez veya düzenleyemezsiniz (şifreyi bilmediğiniz sürece). Burada 0 bir güvenlikten söz etmek yine de zordur. Şifre kırıcı yazılımlar her programda olduğu gibi Excel'de de vardır. Şifrenizin kırılmasını engellemeyi zorlaştırmak istiyorsanız, şifre zorluğunu üst düzey tutmalısınız.

6. Eğer parolayı bilmeyenlerin makroyu çalıştırmasını engellemek istiyorsanız, aşağıdaki kod satırlarını ekleyerek bunun önüne geçebilirsiniz.
Dim parola As Variant
parola = Application.InputBox("Parolayı Yazın", "Parola Korumalıdır")

Select Case parola
Case Is = False
'
Case Is = "ExcelDepo"
Range("A1").Value = "Gizli Kod Örneği"
Case Else
MsgBox "Geçersiz Parola"
End Select
Sayfaya eklediğiniz komut düğmesine tıkladığınızda, sonuç aşağıdaki gibi olacaktır.


mp4
Açıklama: Makronun şifresini girmek için burada InputBox yöntemini kullandık. Eğer İptal'i tıklanırsa, bu yöntem False değerini döndürür ve hiçbir şey olmaz (InputBox kaybolur). Eğer kullanıcı şifreyi biliyorsa, kodları görmeseniz bile kodlar çalışır. Eğer girilen şifre yanlışsa, bir MsgBox görüntülenir ve size yanlış şifre yazdığınızı belirtir.

#Makro Şifreleme
Üstteki alanda, Google Reklamları yerine sizin reklamınızın yayınlanmasını ister misiniz?
Reklam vermek istiyorum

Daha önce yorum yapılmamış!

Bir Excel sayfasında var olan bilgilerin özetini görebilmek için, Şerit Menü -> Gözden Geçir -> Çalışma Kitabı İstatistikleri simgesini kullanabilirsiniz.

Aşağıdaki gibi bir sonuç verecektir:

Çalışma Kitabı İstatistikleri

Bu işlem için Ctrl + Shift + G kısayolunu da kullanabilirsiniz.

Yükleniyor...