Oter la protection de plusieurs feuilles à la fois excel 2013

Limonade -  
 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

  1. via55 Messages postés 14396 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    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
    1. Limonade
       
      Merci beaucoup :-)
      0
    2. Na2s2O3
       
      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 ;-)
      0
    3. Na2s2O3
       
      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 : )
      0