Avant d’envoyer notre cahier au monde, nous devrons peut-être nous assurer que toutes ses feuilles sont protégées. Au lieu d’inclure manuellement la protection de chacun d’entre eux, vous pouvez utiliser la macro à cette fin.
Dans cette macro, les feuilles sont traitées par une boucle dans laquelle la protection leur est fournie. Le paramètre Password spécifie le mot de passe nécessaire pour supprimer la protection. Cet argument est complètement optionnel. S’il est omis, la feuille sera toujours protégée, mais il ne sera pas nécessaire d’entrer un mot de passe pour supprimer la sécurité. Il convient également de rappeler que pour les balises dans Excel, la taille des caractères est importante. Par conséquent, lorsqu’on donne un mot de passe, il convient de prêter attention à cet aspect.
Sub ProtectionFeuille() 'Étape 1: Déclarez la variable Dim mafeuille As Worksheet 'Étape 2: Commencez la boucle pour toutes les feuilles For Each mafeuille In ActiveWorkbook.Worksheets 'Étape 3: Activez la protection et passez à la feuille suivante. mafeuille.Protect Password:="CHANCELIN" Next mafeuille End Sub