XL 2016 protéger et déprotéger la feuille

chris

XLDnaute Barbatruc

• 28 Janvier 2023

• #2

Bonjour

Il faut dans le Workbook.Open protéger les feuilles avec le paramètre UserInterfaceOnly

Ainsi le code peut ensuite agir sans toucher à la protection

 

Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué

• 29 Janvier 2023

• #3

Bo

chris à dit:

Bonjour

Il faut dans le Workbook.Open protéger les feuilles avec le paramètre UserInterfaceOnly

Ainsi le code peut ensuite agir sans toucher à la protection

Cliquez pour agrandir...

Bonjour et merci pour votre réponse.

Pourriez-vous m'indiquer où et comment inclure cette partie de code ?

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 29 Janvier 2023

• #4

Bonjour

Dans le module de ThisWorkkbook
Pour une unique feuille

VB:

Private Sub Workbook_Open()
    [Feuil1].Protect Password:="Toto", UserInterFaceOnly:=True
End Sub

Pour toutes

Code:

Private Sub Workbook_Open()
Dim ws As Worksheet
 
    For Each ws In Worksheets
        ws.Protect Password:="Toto", UserInterFaceOnly:=True
    Next ws
End Sub

 

Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué

• 29 Janvier 2023

• #5

Bonjour, et merci....

Pour le coup, je suis parti sur une autre méthode qui consiste à déverrouiller la feuille au moment de la validation des infos saisies (CommandButton) puis à verrouiller à la fin de l'opération.

Je mets le fichier joint. Qu'en pensez-vous ?

 

Pièces jointes

• COMMANDE TEST v9.xlsm

  40 KB · Affichages: 4

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 29 Janvier 2023

• #6

RE

Cela fonctionne mais fait n déverrouillages et n verrouillages inutilement...

 

Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué

• 29 Janvier 2023

• #7

chris à dit:

RE

Cela fonctionne mais fait n déverrouillages et n verrouillages inutilement...

Cliquez pour agrandir...

oui, mais tenté votre code et, sans doute que je n'ai pas bien suivi la façon de faire, mais cela ne fonctionnait pas.... vous pourriez le mettre en oeuvre ?

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 29 Janvier 2023

• #8

RE

Tu as adapté le mot de passe ?

Tu as bien copié l'un des 2 codes dans le module indiqué ?

 

Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué

• 29 Janvier 2023

• #9

chris à dit:

RE

Tu as adapté le mot de passe ?

Tu as bien copié l'un des 2 codes dans le module indiqué ?
Regarde la pièce jointe 1161903

Cliquez pour agrandir...

Tout à fait, n'ayant qu'une feuille, j'ai pris le premier

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 29 Janvier 2023

• #10

RE

As-tu enregistré, fermé puis rouvert le classeur : l'open ne se déclanche qu'à l'ouverture

 

Vote positif 0 Vote négatif

halecs93

XLDnaute Impliqué

• 29 Janvier 2023

• #11

chris à dit:

RE

As-tu enregistré, fermé puis rouvert le classeur : l'open ne se déclanche qu'à l'ouverture

Cliquez pour agrandir...

oui...

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 30 Janvier 2023

• #12

RE

Au temps pour moi : avec les Tableaux structurés ne marche qu'en protection partielle (par exemple on protège les formules mais pas les cellules saisies).

Si tu remplis avec un Userform, tu protèges donc tout et il faut effectivement faire comme tu as fait, éventuellement au chargement et déchargement du formulaire et pas à chaque ligne si tu as prévu d'en saisir plusieurs à la suite.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 30 Janvier 2023

• #13

Bonjour @halecs93 et @chris

Je prends le fil en cours de route mais effectivement UserInterFaceOnly et les TS ne font pas bon ménage et est à déconseillé avec la protection/déprotection de feuille
Il faut faire "traditionnel" si chose dire ....
On déprotège
On fait l'action
On reprotège

==> https://forum.excel-pratique.com/ex...e-malgre-userinterfaceonly-true-73034#p418171

@Phil69970

 

Vote positif 0 Vote négatif