Unutulan excel sayfa koruma şifresini kurtarma

Fatih Özcan

Site Kurucusu
Katılım
7 Ara 2008
Mesajlar
3,696
Tepki puanı
4,262
Puanları
338
Şehir
İstanbul
Firma
Saipem
Herkesin yaptığı çalışmayı koruma ihtiyacı doğmuştur. Tabi iş yoğunluğunda konulan şifreyi unutanlarda çok olmuştur. Bu yazımız şifre kurtarma üzerine.

Verileri düzenleyemediğiniz parola korumalı bir çalışma sayfasında, çalışma sayfanızın korumasını kaldırmak için aşağıdaki adımları deneyebilirsiniz.
1571217567649.png

Adım 1 - ALT + F11 tuşlarına basın veya Geliştiriciler Sekmesinde Kodu Görüntüle'yi veya en solda gözüken Visual Basic butonuna tıklayın.
1571217580706.png


Adım 2 - Parola korumalı çalışma sayfasına çift tıklayın.
1571217591943.png

Adım 3 - Aşağıdaki kodu kopyalayıp (Kod) penceresine yapıştırın. Kodların hiçbirini değiştirmeyin, kopyalayıp yapıştırın.
C++:
Sub PasswordBreaker()
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
Adım 4 - Çalıştır Düğmesine tıklayın veya F5 tuşuna basın.
1571217649427.png
Kod gözükecektir.

Bu yöntem işe yarar ve çalışma sayfanızın koruması kaldırabilirse, küçük bir pencere açılacak ve size "XXXYYYZZZXXXY" benzeyen tek kullanımlık bir parola verecektir. Bu parolayı kullanarak sayfanızın şifresini kaldırabilirsiniz.

Bu yöntem işe yaramazsa
Bağlantıyı görmek için üye girişi yapmalısınız. Giriş yap veya üye ol.
tıklayarak diğer yöntemi deneyebilirsiniz.
 
Üst