Macro pour protéger les feuilles de calcul dans le classeur Fermer - les nuls

Parfois, vous devez envoyer votre classeur Excel dans le monde avec des feuilles de calcul spécifiques protégées. Si vous constatez que vous protégez et protégez constamment vos feuilles avant de distribuer vos classeurs, la macro ici peut vous aider.

Fonctionnement de la macro

Le code est déclenché par l'événement BeforeClose du classeur. Lorsque vous essayez de fermer le classeur, cet événement se déclenche en exécutant le code à l'intérieur. La macro protège automatiquement la feuille spécifiée avec le mot de passe donné, puis enregistre le classeur:

Private Sub Workbook_BeforeFermer (Annuler en tant que booléen) 'Étape 1: Protégez la feuille avec un mot de passe Sheets ("Sheet1"). Protect Password: = "RED" 'Étape 2: Enregistrez le classeur ActiveWorkbook. Save End Sub

À l'étape 1, vous spécifiez explicitement quelle feuille protéger - Sheet1, dans ce cas. Vous fournissez également l'argument password, Password: = "RED", qui définit le mot de passe nécessaire pour supprimer la protection.

Cet argument de mot de passe est facultatif. Si vous l'omettez, la feuille sera toujours protégée, mais vous n'aurez pas besoin d'un mot de passe pour la déprotéger.

Les mots de passe Excel sont sensibles à la casse, vous devez donc faire attention au mot de passe exact et à la majuscule que vous utilisez.

L'étape 2 indique à Excel de sauvegarder le classeur. Si vous n'enregistrez pas le classeur, la protection de feuille que vous venez d'appliquer ne sera pas effective lors de la prochaine ouverture du classeur.

Comment utiliser la macro

Pour implémenter cette macro, vous devez la copier et la coller dans la fenêtre du code d'événement Workbook_BeforeClose. Placer la macro ici lui permet de s'exécuter chaque fois que vous essayez de fermer le classeur:

1. Activez Visual Basic Editor en appuyant sur Alt + F11.

2. Dans la fenêtre du projet, trouvez le nom de votre projet / classeur et cliquez sur le signe plus à côté pour voir toutes les feuilles.

3. Cliquez sur ThisWorkbook.

4. Dans la liste déroulante Événement, sélectionnez l'événement BeforeClose.

5. Tapez ou collez le code dans le module nouvellement créé, en modifiant le nom de la feuille (si nécessaire) et le mot de passe.

   

   Entrez votre code dans l'événement Workbook BeforeClose.

Notez que vous pouvez protéger des feuilles supplémentaires en ajoutant des instructions supplémentaires avant Activeworkbook. Enregistrer la déclaration.