Comment protéger / déprotéger tous avec VBA dans Worksheets Microsoft Excel 2010
Dans cet article, vous apprendrez comment protéger et déprotéger toutes les feuilles avec le code VBA.
Pour ouvrir l’écran de l’éditeur VBA, suivez les étapes ci-dessous:
Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic
Click on Insert, and then Module
Cela créera un nouveau module.
Entrez le code suivant dans le module pour protéger toutes les feuilles de calcul.
Sub Protect ()
‘Parcourir toutes les feuilles du classeur
Pour i = 1 To Sheets.Count
Feuilles (i) .Protect
Suivant i
End Sub
Pour déprotéger toutes les feuilles de calcul, utilisez le code suivant.
Sub UnProtect ()
‘Parcourir toutes les feuilles du classeur
Pour i = 1 To Sheets.Count
Feuilles (i) .UnProtect
Suivant i
End Sub
Appuyez sur la touche de raccourci ALT + F8 pour ouvrir la fenêtre Macro, puis sélectionnez la macro Protéger.
Vous pouvez également appuyer sur F5 pour exécuter le code dans l’écran VBA.
Après avoir exécuté la macro; toutes les feuilles seront protégées.
Appuyez sur ALT + F8 et sélectionnez Déprotéger
Cela déprotégera toutes les feuilles de calcul.
De cette façon, nous pouvons protéger et déprotéger les feuilles de calcul en cas de besoin.