Code VBA pour déverrouiller une feuille Excel verrouillée : 4 étapes

2024 Auteur: John Day | [email protected]. Dernière modifié: 2024-01-30 09:09

Si vous avez déjà oublié un mot de passe pour l'une de vos feuilles de calcul Excel, vous savez à quel point cela peut être frustrant. Le code utilisé dans cette instruction est l'un des plus simples que j'ai trouvé. Il générera un code utilisable qui déverrouillera votre feuille protégée. Je ne peux pas m'attribuer le mérite du code car je l'ai simplement trouvé dans un moment de besoin (et je ne peux plus trouver où se trouve le site)… alors je ne serai pas d'une grande aide si cela ne fonctionne pas pour vous mais j'ai eu du succès et j'ai pensé partager.

Étape 1: Ouvrez VBA

Ouvrez la feuille de calcul pour laquelle vous avez oublié votre mot de passe. Utilisez Alt + F11 pour entrer dans l'éditeur de macros. Une fois dans VBA, double-cliquez sur la feuille que vous devez déverrouiller dans le menu de gauche. Cela ouvrira la page des déclarations générales de la feuille.

Étape 2: Coupez et collez le code Breaker

Insérez le code ci-dessous dans la page des déclarations générales que vous avez ouverte. Vous ne devriez pas avoir à changer quoi que ce soit, le nom de la feuille, etc. k Comme IntegerDim l Comme Entier, m Comme Entier, n Comme Entier Dim i1 Comme Entier, i2 Comme Entier, i3 Comme Entier Dim i4 Comme Entier, i5 comme Entier, i6 Comme Entier En cas d'erreur Reprendre ensuite pour i = 65 à 66: pour j = 65 à 66: pour k = 65 à 66 pour l = 65 à 66: pour m = 65 à 66: pour i1 = 65 à 66 pour i2 = 65 à 66: pour i3 = 65 à 66: pour i4 = 65 À 66 Pour i5 = 65 À 66: Pour i6 = 65 À 66: Pour n = 32 À 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) Si ActiveSheet. ProtectContents = False Then MsgBox "Un mot de passe utilisable 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) Quitter la sous-fin Si suivant: suivant: suivant: suivant: suivant: suivant suivant: suivant: suivant: suivant: suivant: suivant: suivant Fin Sub_

Étape 3: Exécutez la macro

Une fois le code ajouté, exécutez la macro en sélectionnant Exécuter dans la barre d'onglets de menu en haut de l'écran de l'éditeur VBA ou appuyez simplement sur F5

Étape 4: utilisez le code généré

La macro vous ramènera à la feuille de calcul que vous souhaitez déprotéger. Une boîte de style d'alerte apparaîtra avec un code utilisable. Dans l'onglet du menu Révision, cliquez sur Déprotéger la feuille. Entrez le code généré comme mot de passe et c'est fait. Votre feuille doit être déverrouillée ! Vous devez utiliser ce pouvoir de manière judicieuse et responsable uniquement pour déverrouiller vos propres feuilles de calcul.