Protection feuilles non vérrouillées en vba
Lolo
-
Lolo -
Lolo -
Bonjour,
Je veux protéger toutes les feuilles de mon classeur qui ne sont pas protégées à la fermeture du classeur.
J'ai mis le code suivant :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For i = 1 To Sheets.Count
If Worksheets(i).Protect = False Then
Sheets(i).Protect Password:="OBCCPWD", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingRows:=True, AllowFiltering:=True, AllowUsingPivotTables _
:=True
End If
Next i
End Sub
Cela me protège bien les feuilles non protégées mais ça ne me prend pas le mot de passe.
Je ne comprends pas ce qui cloche.
Merci pour votre aide
Je veux protéger toutes les feuilles de mon classeur qui ne sont pas protégées à la fermeture du classeur.
J'ai mis le code suivant :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
For i = 1 To Sheets.Count
If Worksheets(i).Protect = False Then
Sheets(i).Protect Password:="OBCCPWD", DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingRows:=True, AllowFiltering:=True, AllowUsingPivotTables _
:=True
End If
Next i
End Sub
Cela me protège bien les feuilles non protégées mais ça ne me prend pas le mot de passe.
Je ne comprends pas ce qui cloche.
Merci pour votre aide
A voir également:
- Protection feuilles non vérrouillées en vba
- Comment faire un livret avec des feuilles a4 - Guide
- K9 web protection - Télécharger - Contrôle parental
- Bruler des feuilles de laurier - Guide
- Regrouper plusieurs feuilles excel en une seule - Guide
- Protection cellule excel - Guide
