Sujet Précédent Sujet Suivant

ôter protection de plusieurs feuilles (ici 150)

Résolu/Fermé
noila59216 Messages postés 34 Date d'inscription jeudi 13 septembre 2018 Statut Membre Dernière intervention 18 avril 2019 - 13 sept. 2018 à 13:43
noila59216 Messages postés 34 Date d'inscription jeudi 13 septembre 2018 Statut Membre Dernière intervention 18 avril 2019 - 14 sept. 2018 à 12:14
Bonjour,
est il possible d'ôter la protection de 150feuilles d'un seul coup ???? j'en ai qui sont déjà ôter mais pas toutes .... merci de votre aide




A voir également:

2 réponses

Réponse 1 / 2
titeufdu89 Messages postés 375 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 38
13 sept. 2018 à 13:55
Bonjour Noila,

Colle le code suivant dans un module de ton fichier et lance la macro depuis "Macro" dans l'onglet "Developpeur", il ôtera la protection de chacune des feuilles de ton classeur. 

Sub deproteger()
Dim ws As Worksheet

For i = 1 To Worksheets.Count
Set ws = Worksheets(i)
ws.Unprotect
Next i

End Sub


Bonne journée

Jc
1
titeufdu89 Messages postés 375 Date d'inscription samedi 28 juillet 2012 Statut Membre Dernière intervention 1 avril 2023 38
13 sept. 2018 à 14:42
Petit précision, dès lors qu'un classeur contient des macros (automatisation), il convient d'enregistrer le classeur au format XLSM (prenant en charge les macros) donc enregistre-sous ton classeur au bon format pour pouvoir utiliser cette macro.

Jc
0
noila59216 Messages postés 34 Date d'inscription jeudi 13 septembre 2018 Statut Membre Dernière intervention 18 avril 2019
13 sept. 2018 à 17:06
merciiiiiiiiiiiii
j'fais ça demain .....
0
noila59216 Messages postés 34 Date d'inscription jeudi 13 septembre 2018 Statut Membre Dernière intervention 18 avril 2019
14 sept. 2018 à 12:14
yess ça marche ... j'espère que je saurais le refaire ultétrieurement
0

Discussions similaires

[google sheets] protection de plages
papafab73 -
eriiic -

10 réponses
comment retirer la protection d'un fichier excel 2016
de-padou-2000 -
Patrice33740 -

1 réponse
Enlever la protection dans un document libreoffice writer
jo -
Edawards -

1 réponse
Oter la protection de plusieurs feuilles à la fois excel 2013
Limonade -
Na2s2O3 -

4 réponses
Ôter la protection de centaines de feuille Excel.
SuperPat -
carmenita -

3 réponses
Ôter la protection d'un classeur Excel
Fox -
Meduse56 -

12 réponses