Πως να ξεκλειδώσετε ένα αρχείο Excel χωρίς κωδικό
Πολλές φορές μας έχει τύχει να θέλουμε να επεξεργαστούμε ένα αρχείο excel το οποίο είναι κλειδωμένο και δεν γνωρίζουμε τον κωδικό. Παρακάτω θα σας δείξουμε βήμα προς βήμα τι θα πρέπει να κάνουμε προκειμένου να το ξεκλειδώσουμε.
1. Ανοίγουμε το αρχείο του excel που θέλουμε να ξεκλειδώσουμε.
2. Πηγαίνουμε στο φύλλο εργασίας που θέλουμε.
3. Πατάμε τα πλήκτρα Alt + F11 για να ανοίξουμε την Visual Basic.
4. Πατάμε F7 για να βγει ο Code Editor.
5. Αντιγράφουμε τον παρακάτω κώδικα:
Sub PasswordBreaker()
'Breaks worksheet password protection.
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 Sub6. Πατάμε F5 προκειμένου να εκτελεστεί ο κώδικας.
7. Το φύλλο εργασίας έχει ξεκλειδώσει.
Αν βρήκατε το άρθρο μας χρήσιμο, θέλετε να μείνετε ενημερωμένοι για όλα τα νέα στο τομέα της τεχνολογίας καθώς και σε χρηστικά άρθρα, βοηθήστε μας κάνοντας like στην σελίδα μας στο Facebook πατώντας εδώ
