Microsoft Excel, hesaplamalar yapmanıza, verilerinizin grafiksel temsillerini oluşturmanıza, verilerinizi düzenli tutmanıza ve gerektiğinde korumanıza olanak tanıyan çok sayıda işlev ve özelliğe sahip elektronik bir elektronik tablodur. Excel'in böyle bir özelliği, Excel dosyalarınızı hücre, elektronik tablo ve / veya çalışma kitabı düzeyinde koruma yeteneğidir, ancak bazen veri değişikliklerinin doğru şekilde uygulandığından emin olmak için Excel çalışma kitaplarının korumasını kaldırmak gerekir.
Bu makale, Microsoft Excel 365'in yanı sıra Microsoft Excel 2019, 2016 ve 2013'te korumalı bir Excel elektronik tablosunun korumasının nasıl kaldırılacağına ilişkin adımlar sağlar.
Dosyanın Sahibi Olarak Bir Excel Elektronik Tablosunun Kilidini Açma
Bu yöntem, dosyanın sahibi olarak elektronik tabloyu korumak için kullanılan parolayı hatırladığınızı varsayar.
-
Korunan e-tabloyu açın ve Değerlendirme > Korumayı kaldır. Ayrıca korunan e-tabloyu sağ tıklayıp ardından Korumayı kaldır.
Şeritteki Gözden Geçir sekmesinin Değişiklikler bölümünde korunan bir elektronik tabloyu tanımlayabilirsiniz. Elektronik tablo korumalıysa, Sayfanın Korumasını Kaldır seçeneğini görürsünüz.
-
Elektronik tabloyu korumak için kullanılan şifreyi girin ve ardından OK.
-
Elektronik tablonuz artık korumasız olacak ve değiştirilebilir.
Parolayı Bilmeden Bir Excel Çalışma Kitabının Korumasını Kaldırma
Excel çalışma kitabınızı veya elektronik tablonuzu korumuş olabilirsiniz ve bir süredir, hatta yıllar içinde değiştirmek zorunda kalmamış olabilirsiniz. Artık değişiklik yapmanız gerektiğine göre, bu elektronik tabloyu korumak için kullandığınız şifreyi artık hatırlamıyorsunuz.
Neyse ki, bu adımlar, parolayı tanımlamak için makro olarak bir Sanal Temel komut dosyası kullanarak çalışma kitabınızın korumasını kaldırmanıza olanak tanır.
-
Korumalı elektronik tabloyu açın.
-
Aşağıdaki tuşlardan birine basarak Visual Basic kod düzenleyicisine erişin ALT + F11 veya seç Geliştirici> Kodu Görüntüle.
-
Korunan sayfanın Kod penceresine aşağıdaki kodu girin:
Alt PasswordBreaker ()
Dim i Tam sayı olarak, j Tam sayı olarak, k Tam sayı olarak
Dim l Tam sayı, m Tam sayı, n Tam sayı olarak
Dim i1 Tam Sayı Olarak, i2 Tam Sayı Olarak, i3 Tam Sayı Olarak
Dim i4 Tam Sayı Olarak, i5 Tam Sayı Olarak, i6 Tam Sayı Olarak
On Error Resume Next
İ = 65 ila 66 için: j = 65 ila 66: k = 65 ila 66 için
L = 65 ila 66 için: m = 65 ila 66: i1 = 65 ila 66 için
İ2 = 65 ila 66 için: i3 = 65 ila 66: i4 = 65 ila 66 için
İ5 = 65 ila 66 için: i6 = 65 ila 66: n = 32 ila 126
ActiveSheet.Unprotect Chr (i) ve Chr (j) ve Chr (k) & _
Chr (l) ve Chr (m) ve Chr (i1) ve Chr (i2) ve Chr (i3) & _
Chr (i4) ve Chr (i5) ve Chr (i6) ve Chr (n)
ActiveSheet.ProtectContents = False Then ise
MsgBox "Kullanılabilir bir parola" & Chr (i) & Chr (j) & _
Chr (k) ve Chr (l) ve Chr (m) ve Chr (i1) ve Chr (i2) & _
Chr (i3) ve Chr (i4) ve Chr (i5) ve Chr (i6) ve Chr (n)
Exit Sub
Eğer son
Sonraki: Sonraki: Sonraki: Sonraki: Sonraki: Sonraki
Sonraki: Sonraki: Sonraki: Sonraki: Sonraki: Sonraki
End Sub -
seçmek koşmak basın veya F5 kodu yürütmek için.
-
Kodun çalıştırılması birkaç dakika sürecektir. Bitirdiğinizde, şifre içeren bir açılır pencere alacaksınız. Seçiniz OK ve e-tablonuz korumasız olacaktır.
Bu orijinal şifre değildir ve hatırlamanıza gerek yoktur.