Parola olmadan bir sayfanın kilidi nasıl açılır?

Bir sayfa veya e-tablo korumalıysa, kendisine uygulanan parolayı kullanarak korumayı kaldırabilirsiniz. Bu eğitimde sayfanın korumasını nasıl kaldıracağımızı öğreneceğiz ve ayrıca sayfanın kilidini açmak için şifreyi hatırlamadığınızda VBA’yı nasıl kullanacağımızı da öğreneceğiz.

Parola içeren bir sayfanın korumasını kaldırın veya kilidini açın

1. Öncelikle Sayfa sekmesine sağ tıklayın.
   
2. Bundan sonra “Sayfanın Korumasını Kaldır” seçeneğine tıklayın.
   
3. Şimdi giriş çubuğuna şifreyi girin.
   
4. Sonunda sayfanın korumasını kaldırmak için Tamam’ı tıklayın.
   

Bir sayfanın veya e-tablonun korumasını kaldırmak için bu basit adımları uygulamanız gerekir. Ancak şifreniz yoksa şifreyi unutursunuz. Bu durumda farklı bir yöntem kullanmanız gerekir.

Parola olmadan bir sayfanın kilidini açma

Dediğim gibi bunun için VBA kodunu kullanmanız gerekiyor. Ve kullanmanız gereken kod aşağıdadır.

 Sub unlock_sheet_without_password() 'Add the code Visual Basic Editor and Run it. Dim i As Integer, j As Integer, k As Integer Dim l As Integer, m As Integer, n As Integer Dim i1 As Integer, i2 As Integer, i3 As Integer Dim i4 As Integer, i5 As Integer, i6 As Integer On Error Resume Next For i = 65 To 66: For j = 65 To 66: For k = 65 To 66 For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66 For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66 For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126 ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _ Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _ Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) If ActiveSheet.ProtectContents = False Then MsgBox "One usable password is " & Chr(i) & Chr(j) & _ Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _ Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) Exit Sub End If Next : Next : Next : Next : Next : Next Next : Next : Next : Next : Next : Next End Sub

Not : Bu kodu kullanmadan önce bir dosya yedeğini kaydedin. Bazen şifreyi çalıştırmak ve kırmak zaman alabilir.

1. Geliştirici sekmesine gidin ve Visual Basic’e tıklayın . Geliştirici sekmeniz yoksa, önce onu etkinleştirmeniz gerekir.
   
2. Pencerenin sağ tarafında sayfa adına tıklayın ve oradan yeni bir modül ekleyin.
   
3. Pencerenizin sağ tarafında kod pencereniz var. Kodu oraya yapıştırın.
   
4. Bundan sonra kodu çalıştırmak için Çalıştır düğmesine tıklayın.
   
5. Sonuçta kodu çalıştırdığınızda, mesaj kutusunda sayfanın korumasını kaldırmak için kullanabileceğiniz kırık bir şifre gösterilir.

Paket servis

• Bu kodu kullanmadan önce bir dosya yedeğini kaydedin. Bu kodu çalıştırırsanız Excel’in çökmesine neden olabilirsiniz.
• Excel 365 veya 2013 ile 2021 arasındaki herhangi bir sürümü kullanıyorsanız, önce dosyayı XLS formatında kaydetmeniz, ardından da Excel 365’i kırmanız gerekir.
• Bu, aynı anda yalnızca bir sayfa için işe yarar. Birden fazla sayfanız varsa kodu o kadar çalıştırmanız gerekir.