Comment récupérer le mot de passe de protection perdu d'une feuille de calcul dans Excel ?

Nous définissons toujours des mots de passe pour protéger certaines feuilles de calcul importantes contre la destruction ou la modification par d'autres personnes. Mais si vous oubliez vos mots de passe, que pouvez-vous faire ? Heureusement, Excel prend en charge certains codes VBA pour récupérer votre mot de passe de protection de feuille de calcul perdu. Vous pouvez résoudre ce problème comme suit :

Récupérer le mot de passe de protection perdu d'une feuille de calcul dans Excel avec du code VBA

Récupérer le mot de passe de protection perdu d'une feuille de calcul dans Excel avec du code VBA

Le code VBA suivant peut vous aider à annuler rapidement vos mots de passe d'origine dans une feuille de calcul.

1. Ouvrez votre feuille de calcul qui a été protégée auparavant.

2. Maintenez les touches ALT + F11 enfoncées, et cela ouvre la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.

Code VBA : récupérer le mot de passe de protection perdu d'une feuille de calcul

Sub PasswordRecovery()
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

4. Ensuite, cliquez sur la touche F5 pour exécuter ce code, et une boîte de dialogue apparaîtra ; cliquez sur OK pour la fermer, et vos mots de passe de la feuille de calcul protégée seront annulés immédiatement.

Remarques :

1. Avec ce code, vous ne pouvez récupérer qu'un seul mot de passe de protection de feuille de calcul à la fois. S'il y a plusieurs feuilles de calcul protégées, vous devez appliquer ce code une par une.
2. Le code ci-dessus provient de http://excelzoom.com/2009/08/how-to-recover-lost-excel-passwords/.

Articles connexes

Comment protéger plusieurs feuilles de calcul en même temps dans Excel ?

Comment déprotéger plusieurs feuilles de calcul en même temps dans Excel ?