Oter la protection d'une feuille excel par macro (tabulations refaites)
Soyez le premier à donner votre avis sur cette source.
Snippet vu 314 729 fois - Téléchargée 43 fois
Contenu du snippet
La macro enleve la protection de la feuille excel active.Choisissez Outils, Macro, Visual Basic Editor et collez cette Macro. Dans la feuille active protégée, choisissez Outils, Macro, Macro puis selectionnez la macro enleve_protection et cliquez sur Executer. La macro enlève la protection de la feuille et affiche quel est le mot de passe qui est parvenu à ce résultat.
Testé sous Excel 97.
Source / Exemple :
Sub enleve_protection()
Dim a, b, c, d, e, f, g, h, i, j, k, l As Integer
On Error Resume Next
For a = 65 To 66
For b = 65 To 66
For c = 65 To 66
For d = 65 To 66
For e = 65 To 66
For f = 65 To 66
For g = 65 To 66
For h = 65 To 66
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 32 To 126
ActiveSheet.Unprotect Chr(a) & Chr(b) & Chr(c) &_
Chr(d) & Chr(e) & Chr(f) & Chr(g) & Chr(h) &_
Chr(i) & Chr(j) & Chr(k) & Chr(l)
If ActiveSheet.ProtectContents = False Then
MsgBox "La Protection a été enlevée - Un mot de passe satisfaisant est :" & Chr(a) & Chr(b) & _
Chr(c) & Chr(d) & Chr(e) & Chr(f) & Chr(g) & _
Chr(h) & Chr(i) & Chr(j) & Chr(k) & Chr(l)
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub
Conclusion :
Testé sous Excel 97.
A voir également
- Oter protection feuille excel vba
- Vba oter protection feuille - Meilleures réponses
- Macro oter protection feuille excel - Meilleures réponses
- Visual Basic / VB.NET : Ôter protection feuille d'un classeur excel & trouver mot de pass - Guide
- Copier une cellule dans une autre feuille excel vba ✓ - Forum - Visual Basic
- Insérer une image dans une feuille excel ✓ - Forum - Visual Basic
- Comparaison de graphiques dans deux feuilles excel(VBA) ✓ - Forum - Visual Basic 6
- Créer CommandButton dans feuille Excel (VBA) ✓ - Forum - Visual Basic
Il faut juste respecter la mise en page des lignes (pas de retour à la ligne...)
Merci, la macro original fonctionne bien.
j'ai ouvert la feuille protégée aller dans "outil, macro, visual basic editor" et sur sur l'écran de droite fait la copie du programme ci-dessus puis retourner dans la feuille. Cependant, en faisant "outil, macro, macro" mais il n'y a pas macro enleve_protection. Pouvez-vous détailler la procédure et où trouver la fonction enleve_protection.
Merci pour votre aide
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.