Cette protection permet également de maintenir la cohérence des données et de réduire le risque d’erreurs.
Voici un exemple de code VBA que vous pouvez utiliser pour protéger toutes les feuilles de calcul d’un classeur avec un mot de passe :
Sub ProtectAllSheets()
Dim ws As Worksheet
Dim password As String
password = “Test123”
For Each ws In Worksheets
ws.Protect Password:=password
Next ws
End Sub
Explication du code :
- Dim password As String : Déclare une variable de mot de passe pour stocker le mot de passe à utiliser.
- password =“Test123” : Définit la valeur par défaut du mot de passe. Vous pouvez remplacer « Test123 » par le mot de passe que vous souhaitez.
- ws.Protect Password :=password : Définit la propriété Protect de la feuille de calcul avec un mot de passe prédéfini, afin que la feuille de calcul soit protégée.
Comment utiliser les macros pour déprotéger toutes les feuilles de calcul à la fois
La déprotection d’une feuille de calcul Excel est indispensable lorsque vous souhaitez modifier ou mettre à jour des données précédemment verrouillées. Si de nombreuses feuilles de calcul sont protégées par un mot de passe, leur ouverture une par une peut prendre beaucoup de temps.
À l’aide des macros VBA, vous pouvez rapidement déprotéger toutes les feuilles de calcul d’un classeur, ce qui facilite l’accès et la modification des données.
Voici un exemple de code VBA que vous pouvez utiliser pour annuler la protection de toutes les feuilles de calcul d’un classeur :
Sub UnprotectAllSheets()
Dim ws As Worksheet
Dim password As String
password = “Test123”
For Each ws In Worksheets
ws.Unprotect Password:=password
Next ws
End Sub
Explication du code :
- password =“Test123” : Définit la valeur par défaut du mot de passe. Vous devez remplacer « Test123 » par le mot de passe approprié.
- ws.Unprotect Password :=password : Utilise le mot de passe spécifié pour ouvrir la protection de la feuille de calcul.