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 "TADAH ! Le PassWord est : " & 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
PassFab for Excel - De PassFab | |
Limité dans sa version gratuite, il est celui qui fonctionne dans bien des cas. |
Excel Password Recovery Master - De RiXLER | |
Très intuitif et facile d'utilisation, il est cependant obsolète pour beaucoup de fichiers Excel récents. |
Passper for Excel - De iMyPhone | |
Très intuitif et facile d'utilisation, il est compatible avec les versions d'Excel allant de 2003 à 2019. |
De Yves Lolo TOULASSI-ANANI le 16-04-2019 à 18:52 | |
Le code plante le fichier. J’ai beau essayé. Ca arrête Excel. |
De | |
En reponse à Yves Lolo TOULASSI-ANANI : Je viens de tester le code et il fonctionne, quelle version de Office vous avez et sous quel OS êtes vous ? |
De Philippe le 19-07-2019 à 15:26 | |
Bonjour, j’ai créé un fichier excel (version 2013) avec des données sensibles. Je l’ai donc protégé avec un mot de passe. Malheureusement, je ne m’en rappelle plus. Avez-vous une solution ? La procédure ci-dessus ne fonctionne pas car quanf je fais alt F11, rien n’apparait puisque je ne peux pas ouvrir le fichier. Merci |
De Vince le 19-06-2019 à 12:36 | |
Excellent ! marche à la perfection. Merci. |
De | |
En reponse à Vince : Je suis ravis d’avoir pu vous aider :) |
De Yann le 26-07-2019 à 8:36 | |
Super ! Quel efficacité. Grande aide m’a été apportée. MERCI. |
De | |
En reponse à Yann : Merci, je suis heureux de pouvoir aider :) |
De Tim le 27-10-2019 à 26:57 | |
Excellent, protection feuille désactivée en 1 ou 2 minutes. Peut être qu’on peut appliquer la même méthode sur le classeur tout entier? En tout cas, j’ai pu copier/coller une feuille qui ne contenait pas de code méritant une protection et l’objectif était juste de récupérer la mise en forme de la page et d’un graph avec la possibilité de modifier quelques données d’entrées. N’utiliser pas cette technique sur des documents confidentiels! |
De | |
En reponse à Tim : Je confirme 😁 |
De Nonolepetitrobot le 26-11-2019 à 23:41 | |
Merci vous venez de me sauver la vie 🙂 nickel sous la version 2016 |
De | |
En reponse à Nonolepetitrobot : De rien 🤓Votre vie vaut sans doute mieux qu’un tableur Excel quand même 😅Allez disont que je vous ai sauvez votre journée, c’est déjà honorable 😊 |
De Merlin le 5-12-2019 à 9:58 | |
Bonjour, je viens de tester , le code fonctionne sur l’onglet 1 mais pas sur les autres.Je suis sur mac OSX CATALINA et office 365 en local Une idée ? |
De | |
En reponse à Merlin : Si les fichiers sont sur votre Mac et que même en hors ligne ça pose problème, je ne sais pas ????Je ne me suis pas penché sur le cas de office 365, c’est souvent particulier avec lui 😌 |
De MEROUAN le 10-02-2020 à 3:26 | |
Très utile Merci !!!!!! |
De Manu le 11-05-2020 à 15:43 | |
Superbe merci J’avais des fichiers excel dont j’avais oubliés les mdp depuis 2015.Merci encore |
De Alex le 13-01-2021 à 13:25 | |
Je vous remercie! Informations très intéressantes et utiles. De plus, vous pouvez utiliser un programme spécial pour récupérer le mot de passe des fichiers Excel : Manyprog Excel Password Recovery |
De | |
En reponse à Alex : Merci. Oui il existe quelques logiciels pour débloquer les fichiers Excel, je ferai un ajout à l'article. |