Protection feuil3 Résolu/Fermé

Question

Bonjour, 

Je voudrais protéger une feuille lorsque l'on quitte cette feuille, mais la difficulté c'est que cette feuille peut déjà être protégée. Les personnes qui vont utiliser le fichier l'ignore.
Donc si elle est protégée, quitter la macro, si elle n'est pas protégée, la protéger avec le mot de passe "toto"

Je vous remercie de vous pencher sur ma demande.

Excel 2003 et 2013

Configuration: Windows / Firefox 60.0

jean300 · Answer

J'ai essayer ce code mais il ne protège pas ma feuille

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With Sheets("Param") 'Feuil3
      Range("B10:C15").Font.ColorIndex = 35
      .Protect Password:="Param", DrawingObjects:=True, Contents:=True, Scenarios:=True
      .EnableSelection = xlNoSelection
    End With
    Application.Quit
End Sub

Mike-31 · Answer

Bonsoir,

si j'ai bien compris ta demande, c'est de protéger  la feuille 3 nommée Param en la quittant avec mot de passe toto

alors clic droit sur l'onglet de ta feuille3/Visualiser le code/colle le code ci-dessous

Private Sub Worksheet_Deactivate()Sheets("Param").Protect Password:="toto"End Sub

jean300 · Answer

Bonsoir Mike
Je te remercie c'est super
Bonne soirée

Protection feuil3

3 réponses

Discussions similaires