Protection de feuille Excel

Sorry, mais ça ne marche pas , erreur d'exécution 1004
Merci,

Steve

Eh oui,
je n'avais pas vérifié, car cela me semblait tellement évident
Le message d'erreur précise que je ne peux pas 'définir la propriété Locked de la classe Range'
Je ne comprends pas dans l'immédiat
Je regarderai ce soir
A+
Léa

Essaie ceci, mais surtout vérifie bien que les feuilles sont déprotégeées avant d'utiliser ce code, c'est peut-être pour cela que nous obtenions une erreur

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
For P = 1 To Sheets.Count
Sheets(P).Activate
Worksheets(P).Range('E11:E51,E56:E67').Select
Selection.Locked = False
Worksheets(P).Range('A1').Select
Sheets(P).Protect
Next P
Application.ScreenUpdating = True
End Sub

Léa

Voili voilà li fichier en question ...
Les huit premières feuilles : ' Le boudais... à ...X3 '
Les cases de couleurs de E12-E51 et E56-E67 ne doivent pas
être verrouillé ...
Et c'est tout le reste de la feuille qui doit être protégé ....

Merci

Snake [file name=Copie de ZONE 11 Woerth 105_20050225181051.zip size=21123]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie de ZONE 11 Woerth 105_20050225181051.zip[/file]

j'ai regardé ton fichier et j'ai compris pourquoi il y avait un problème : tu veux 'libérer' des cellules qui appartiennent à des lignes masquées (E11 à E67)

Il faudrait que tu m'expliques exactement quelle est la procédure que tu veux appliquer
Pour cela, et pour ne pas 'polluer' le Fil avec les interventions que nous pourrions avoir, envoie moi un mail à
leaemile@wanadoo.fr
une fois le travail terminé on mettra le résultat sur le Fil comme la charte le préconise
Léa

Voila, cette fois ci ça fonctionne
J'ai été perturbée par les difficultés qui s'étaient présentées, bien que tu n'avais pas masqué des lignes comme je le pensais
Attention quand même ne lance pas la procédure de protection si les feuilles sont déjà protégées, tu retrouveras l'erreur rencontrée précedemment
Au fait pour protéger ou déprotéger :
'Outils'
'Macros'
la macro protection pour protéger donc tu clic dessus et 'Exécuter'
la macro déprotection pour déprotéger évidemment

J'ai testé ça marche

Bon courage
Léa

PS : je te prie de bien vouloir excuser mes hésitements, voila ce que c'est de vouloir courir plusieurs Fils en même temps [file name=Copie de ZONE 11 Woerth 105_20050225203557.zip size=31135]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie de ZONE 11 Woerth 105_20050225203557.zip[/file]

Bijour à toi ,

Bon w-e ...?
Merci, surtout pour ta patiente ...
Et surtout pour cette épine que tu m'enlèves di pied ...

PS : Merci à tout li monde

Biz

A+

Steve