Protections onglets

Le
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
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
LSteph
Le #4565731
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




Publicité
Poster une réponse
Anonyme