Sayfaya Koruma Şifresi Koyma isimli içerikte, Excel çalışma sayfanıza koruma şifresi ekleyerek, sayfanızdaki hücrelerin istenmeyen değişikliklere karşı korunmasını sağlayan bir Hazır Makro Kodu yer almaktadır.
Hazır Kodlar
VBA:
Sub SayfaKorumaSifresiKoy()
Dim sifre As String
sifre = InputBox("Koruma şifresini girin:", "Sayfa Koruma")
If sifre <> "" Then
ActiveSheet.Protect Password:=sifre
MsgBox "Sayfa başarıyla korundu.", vbInformation
Else
MsgBox "Şifre girmediniz. Sayfa korunmadı.", vbExclamation
End If
End Sub
Açıklama
Bu kod, Excel çalışma sayfanıza bir koruma şifresi eklemenizi sağlar. Kullanıcıdan bir şifre girmesi istenir ve bu şifre ile sayfa korunur. Eğer kullanıcı şifre girmezse, sayfa korunmaz ve bir uyarı mesajı görüntülenir.Kullanım
- Kodu çalıştırarak sayfaya koruma şifresi ekleyin.
- Sayfanızı şifre koruması ile güvence altına alabilirsiniz.