Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Protections feuilles

  • Initiateur de la discussion Initiateur de la discussion JP54
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JP54

XLDnaute Junior
Bonjour,
J'ai un classeur sous excel 2007 avec environ 150 feuilles et je voudrais les protéger toues ensemble
Donc je cherche un code VBA avec ou sans mot de passe avec un ou deux butons pour activer et désactiver la protection, bref quelques chose de simple à utiliser.
Si je pouvais avoir un fichier en exemple ça serait fort bien afin de tester avant de modifier tout mon fichier
J'en ai trouvé sous des versions d'excel inférieur à 2007 et qui ne fonctionne pas.
Merci d'avance
 
Re : Protections feuilles

Re

Ces deux macros qui sont quasi-identiques à celles que je cite fonctionnent sans problème sur XL 2013
(donc elles doivent fonctionner sur XL 2007)
Code:
Sub prot()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Protect
Next
End Sub
Code:
Sub deprot()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Unprotect
Next
End Sub
 
Re : Protections feuilles

Re

Donc désormais tu as deux macros fonctionnelles, et le tutoriel pour créer des boutons "lanceur de macros"

Donc ta question est résolue et je peux aller faire infuser mon thé 😉

NB: On est bien d'accord, que les réponses étaient déjà là dans les archives du forum et sur le net 😉
 
Re : Protections feuilles

Bonjour JP54,

Permettez-moi d'exprimer mon admiration devant la sobriété que vous affichez à remercier Staple1600 au fur et à mesure qu'il vous aide : pas un mot de trop, même pas une salutation... Mais après tout, c'est normal : il est là pour ça.

Moi je profite de ce post pour le féliciter à l'occasion de son nouveau passage de cap : 22 000 réponses destinées à partager pour aider, ce n'est pas rien !
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
1 K
Compte Supprimé 979
C
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…