Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Protection de feuilles

Protection de feuilles

1 réponse
Avatar
Francis
Bonjour j'utilise présentement

Sub ProtectAllSh()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
sh.Protect Password:="toto", userinterfaceonly:=True
Next
End Sub

Sub UnProtectAllSh()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
sh.Unprotect Password:="toto"
Next
End Sub


pis tout fonctionne, mais je veux savoir ce que je dois rajouter pour que
j'aie seulement accès a mes cellules dévérouillé , que ne puise pas
sélectionner les cellules verouillées.

Merci
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Francois L
Bonjour j'utilise présentement

Sub ProtectAllSh()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
sh.Protect Password:="toto", userinterfaceonly:=True
Next
End Sub

Sub UnProtectAllSh()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
sh.Unprotect Password:="toto"
Next
End Sub


pis tout fonctionne, mais je veux savoir ce que je dois rajouter pour que
j'aie seulement accès a mes cellules dévérouillé , que ne puise pas
sélectionner les cellules verouillées.



Bonjour,

Si j'ai bien compris...

Déverrouiller les cellules qui doivent rester accessibles et laisser la
feuille protégée.

--
François L