Protection de feuilles

[cora]

Bonjours à tous,
Puis-je avoir une astuce pour protéger une serie de feuilles choisies et les déprotéger de la même manière.
ex: les feuilles de 1 à 40 mais pas la feuille 41

 

[jeanpierre]

Re : Protection de feuilles

Bonjour cora,

Tu trouveras quelques pistes en bas de ce fil, dans les cinq discussions similaires et, aussi, avec le fonction Recherche du forum.

Il y a un fil qui date de très peu, si je le retrouve je te le mettrai en lien, mais là je viens juste de rentrer et plein de choses à faire.

Bonne journée.

Jean-Pierre

 

[Staple1600]

Re : Protection de feuilles

Bonjour cora, jeanpierre, le fil, le forum


Un exemple
(protège toutes les feuilles sauf la dernière)

Sub protection()
Dim i As Long
For i = 1 To Sheets.Count - 1
Sheets(i).Protect
Next
End Sub