Protéger toutes les feuilles...

Anonyme

Bonjour,

Sous Excel 2003 - Windows XP :

Comment faire pour protéger avec mot de passe et en une seule opération toutes les feuilles de calcul d'un même classeur ? Évidemment, pouvoir aussi "déprotéger" tout aussi rapidement toutes les feuilles ? J'aimerais que le mot de passe soit demandé lors de la protection comme lors de la "déprotection".

Probablement en VBA mais... je ne m'y connais pas beaucoup ! Alors, un exemple de code serait apprécié et, surtout, à quel endroit inscrire le code VBA dans la fenêtre VBA ?

Note : Le classeur en question contient déjà 50 feuilles pour lesquelles des formules avec liaison existent entre plusieurs. De plus, plusieurs autres codes (VBA - Macros) existent déjà dans ce classeur.

Merci à qui pourrait m'aider,

Normand

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires

13 réponses

Supprimé

Cette réponse a été supprimée en raison d’une violation de notre Code de conduite. La réponse a été signalée manuellement ou identifiée via la détection automatisée avant que l’action ne soit entreprise. Pour obtenir plus d’informations, veuillez consulter notre Code de conduite.

Les commentaires ont été désactivés. En savoir plus
Anonyme

2012-06-16T22:22:26+00:00
Daniel,

Dans le message précédent, j'avais mis une "capture d'écran" du message d'erreur de VBA mais je constate (j'aurais dû y penser !) qu'il ne s'affiche pas dans mon message.

Alors, au no. 4 de mon message précédent, le message d'erreur que je reçois en exécutant la macro "déprotéger()" est :

"Erreur d'exécution '1004':

Mot e passe non valide. Vérifiez que la touche VERR. MAJ. n'est pas activée et que vous respectez la bonne casse".
- J'ai tapé le bon mot de passe et correctement.
- Comme mentionné dans mon message précédent, après ce message d'erreur, tout est pourtant bien déprotégé !
- Toutes les autres infos de mon message précédent sont OK...
À+

Normand
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire
Supprimé

Cette réponse a été supprimée en raison d’une violation de notre Code de conduite. La réponse a été signalée manuellement ou identifiée via la détection automatisée avant que l’action ne soit entreprise. Pour obtenir plus d’informations, veuillez consulter notre Code de conduite.

Les commentaires ont été désactivés. En savoir plus
DanielCo 107.1K Points de réputation

2012-06-16T16:47:57+00:00

Dans la fenêtre VBE, clique dans la macro Déprotection. Appuie sur la touche F8. L'exécution s'exécute ligne à ligne à chaque fois que tu appuies sur F8. Regarde sur quelle ligne tu as le problème.

Daniel
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire
Anonyme

2012-06-16T16:39:40+00:00

Re-bonjour Daniel,

Excellent... la macro proposée placée dans un module Standard fonctionne exactement comme je le voulais... parfait !

Quant au message concernant la "déprotection", il n'y a pas de bouton "débogage" sur ce message. Il n'y a qu'un bouton "OK" et un "Aide" ! À ce moment, tout est "bloqué" (focus sur le message) quant aux autres manœuvres et ce, tant et aussi longtemps qu'on ne clique pas sur "OK". Je ne peux donc pas accéder à la fenêtre "débogage" de VBA. Après avoir cliqué sur OK et en ouvrant le VBA, il n'y a évidemment aucune ligne en surbrillance dans le code mais... les feuilles sont bien déprotégées !

Note : Si je comprends bien, pour l'instant, (après avoir supprimé ce qu'il y avait dans ThisWorkBook) il n'y a que la macro pour protéger les feuilles dans le classeur...une macro semblable pour déprotéger serait excellente.

Encore merci,

Normand
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire