La fonction décrite ici vérifie si une feuille de calcul est protégée. Vous devez d’abord créer une feuille de calcul et la protéger, puis vous pouvez écrire une fonction définie par l’utilisateur pour la tester.
Pour vérifier si une feuille de calcul est protégée :
- Appuyez sur <Alt+F11> pour ouvrir Visual Basic Editor.
- Dans le menu Insertion, cliquez sur Module.
- Tapez la fonction suivante :
Function ProtegeFeuille(s As String) As Boolean On Error GoTo errorAB If Sheets(s).ProtectContents = True Then ShProt = True End If Exit Function errorAB: ShProt = False End Function
- Fermez l’éditeur VBA en appuyant sur <Alt+Q>.
- Sélectionnez n’importe quelle cellule de la feuille de calcul et saisissez la formule =ProtegeFeuille (“Feuille15”). Assurez-vous de remplacer “Feuille15” par le nom de la feuille dont vous souhaitez vérifier la protection.
- Appuyez sur <Entrée>.