Oter la protection de plusieurs feuilles à la fois excel 2013 [Fermé]

Signaler
-
 Na2s2O3 -
Bonjour,
Mon classeur comprend plusieurs onglées.
pour les protéger, il m'a fallut le faire onglet par onglet ? :-)
Puis pour déprotéger, (car je dois faire une modification) je dois refaire la même manipulation.
Peut-on faire tout d'un coup en sélectionnant chaque onglet ? SVP :-)
Merci de votre aide.



1 réponse

Messages postés
12359
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
1 juillet 2020
1 915
Bonjour

Je ne pense pas mais tu peux le faire par macro
Macro à mettre dans un module
Sub deprotection
For n= 1 to sheets.count
sheet(n).Unprotect ("tonmotdepasse") 'à adapter avec le bon mdp, si protection sans mot de passe enlever toute la parenthèse
next n


Tu peux faire une autre macro pour reprotéger en changeant simplement le Unprotect en Protect

Cdlmnt



"L'imagination est plus importante que le savoir." A. Einstein
4
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65104 internautes nous ont dit merci ce mois-ci

Merci beaucoup :-)
Merci, génial, je vais gagner beaucoup (beaucoup) de temps !
PS: ligne 3, ne pas oublier d'ajouter le "s" à sheet, juste avant la parenthèse ;-)
Bonjour, je viens de me rendre compte qu'en agissant de la sorte, les feuilles sont bien toutes protégées, mais que la fonction filtre n'est plus accessible, y a-t-il une commande spécifique que l'on puisse ajouter dans la macro pour permettre l'utilisation des filtres une fois la feuille protégée ?
Ok, j'ai trouvé, il suffit d'ajouter: ,AllowFiltering:=True après la parenthèse juste après le mot de passe : )