verrouillage feuil

[bruno]

bonjour à tous
encore une question pour nos experts:
comment peut on verrouiller plusieurs feuilles dans un classeur.
j'ai un classeur qui contient 10 feuilles (feuil1, feuil2,.....feuil10)
lorsque les gens ont saisis via des userforms des donnees,je voudrais verrouiller les feuilles2 à feuilles5 pour eviter des problemes d'effacement lors d'extraction eventuelle.
auriez vous la solution vba.

merci d'avance

 

[@+Thierry]

Salut Bruno


Tout est dans ce fil ===> protection feuilles excel

Maintenant si tu veux ne pas protéger certaines feuilles il faut faire une condition du style

Option Explicit
Sub ProtectionFeuillesMDP()
Application.ScreenUpdating = False
Dim WS As Worksheet
For Each WS In Sheets
If WS.Name <> "Interface" or WS.Name <> "Toto" then
Feuil.Protect Password:="THIERRY"
Next WS
end if
End Sub

Bon Week End
@+Thierry