Protection feuil3
Résolu
jean300
Messages postés
382
Statut
Membre
-
jean300 Messages postés 382 Statut Membre -
jean300 Messages postés 382 Statut Membre -
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
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
A voir également:
- Protection feuil3
- K9 web protection - Télécharger - Contrôle parental
- Produit de protection solaire - Guide
- Protection cellule excel - Guide
- Sentinel protection installer - Télécharger - Antivirus & Antimalwares
- Protection en ecriture kodak ✓ - Forum Logiciels
3 réponses
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
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