Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Protections onglets

1 réponse
Avatar
fabio
Bonjour !

1 - Est-il possible de protéger par mot de passe plusieurs onglets en même
temps ?
2 - Comment les déprotéger en même temps ?

Merci d'avance !

Eric

1 réponse

Avatar
LSteph
Bonjour,
1 - Est-il possible de protéger par mot de passe plusieurs onglets en
même temps ?
en vérité ce sera toujours un par un mais par macro (instantané)



Sub protSh()
Dim sh As Object
For Each sh In ActiveWorkbook.Sheets
sh.Protect "motdepasse"
Next
End Sub
2 - Comment les déprotéger en même temps ?
'...idem avec


sh.UnProtect "motdepasse"

3.Comment protèger et pouvoir agir par macro sans besoin de déprotèger
'...idem avec
sh.Protect password:="motdepasse", userinterfaceonly:=true

4.Comment protèger seulement les feuilles de calcul

Sub protSh()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.WorkSheets
sh.Protect "motdepasse"
Next
End Sub

'Cordialement

'LSteph

Bonjour !

1 - Est-il possible de protéger par mot de passe plusieurs onglets en
même temps ?
2 - Comment les déprotéger en même temps ?

Merci d'avance !

Eric