Une macro pour protéger les feuilles de calcul sur classeur proximité

Parfois, vous devez envoyer votre classeur Excel dans le monde avec des feuilles de calcul spécifiques protégés. Si vous trouvez que vous êtes constamment protéger et de feuilles de déprotection avant de distribuer vos classeurs, la macro ici peut vous aider.

Sommaire

Comment les œuvres macro

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

Private Sub Workbook_BeforeClose (Cancel As Boolean) 'Étape 1:. Protéger la feuille avec un passwordSheets ("Sheet1") Protéger Mot de passe: = "red"' Etape 2: Sauver le Sous workbookActiveWorkbook.SaveEnd

Dans l'étape 1, vous êtes explicitement préciser quelle feuille de protéger - Sheet1, dans ce cas. Vous fournissez également l'argument de mot de passe, mot de passe: = "red", qui définit le mot de passe nécessaire pour retirer la protection.




Cet argument de mot de passe est facultative. Si vous l'omettez, la feuille sera toujours # 173-protégé, mais vous ne serez pas besoin d'un mot de passe pour déprotéger.

Mots de passe Excel sont sensibles à la casse, de sorte que vous aurez envie de faire attention au mot de passe et la capitalisation exacte que vous utilisez.

Étape 2 indique à Excel pour enregistrer le classeur. Si vous ne sauvegardez pas le classeur, la protection de la feuille que vous venez d'appliquer ne sera pas en effet la prochaine fois que le classeur est ouvert.

Comment utiliser la macro

Pour mettre en œuvre cette macro, vous devez copier et le coller dans la fenêtre de code de l'événement Workbook_BeforeClose. Placer la macro ici lui permet de fonctionner chaque fois que vous essayez de fermer le classeur:

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

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

  3. Cliquez ThisWorkbook.

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

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

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

Notez que vous pouvez protéger des feuilles supplémentaires en ajoutant des déclarations d'addition avant la déclaration Activeworkbook.Save.


» » » » Une macro pour protéger les feuilles de calcul sur classeur proximité