Tout comme vous pouvez protéger par mot de passe des classeurs et des feuilles de calcul, vous pouvez mot de passe protéger une macro dans Exceller d'être vu (et exécuté).
Placez un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code suivantes :
1. Tout d'abord, créez une macro simple que vous souhaitez protéger.
Range("A1").Value = "Ceci est un code secret"
2. Ensuite, cliquez sur Outils, Propriétés du projet VBA.
3. Dans l'onglet Protection, cochez « Verrouiller le projet pour la visualisation » et saisissez deux fois un mot de passe.
4. Cliquez sur OK.
5. Enregistrez, fermez et rouvrez le fichier Excel. Essayez de voir le code.
La boîte de dialogue suivante apparaîtra :
Vous pouvez toujours exécuter le code en cliquant sur le bouton de commande mais vous ne pouvez plus afficher ou modifier le code (sauf si vous connaissez le mot de passe). Le mot de passe du fichier Excel téléchargeable est "easy".
6. Si vous souhaitez protéger par mot de passe l'exécution de la macro, ajoutez les lignes de code suivantes :
Diminuer le mot de passe en tant que variante
mot de passe = Application.InputBox("Entrez le mot de passe", "Protégé par mot de passe")
Sélectionnez le mot de passe du cas
Cas est = faux
'ne fais rien
Case Is = "facile"
Range("A1").Value = "Ceci est un code secret"
Cas autre
MsgBox "Mot de passe incorrect"
Fin de la sélection
Résultat lorsque vous cliquez sur le bouton de commande sur la feuille :
Explication : La macro utilise la méthode InputBox de l'objet Application. Si les utilisateurs cliquent sur Annuler, cette méthode renvoie False et rien ne se passe (InputBox disparaît). Ce n'est que lorsque l'utilisateur connaît le mot de passe ("easy" encore), que le code secret sera exécuté. Si le mot de passe saisi est incorrect, une MsgBox s'affiche. Notez que l'utilisateur ne peut pas consulter le mot de passe dans Visual Basic Editor car le projet est protégé contre l'affichage.
