Fichier protégé par une macro comment modifier le format cellule
Résolu
Natty
-
NattyMA Messages postés 3 Statut Membre -
NattyMA Messages postés 3 Statut Membre -
Bonjour,
J'ai créé un fichier excel. Mon objectif était de pouvoir le protéger via mot de passe tout en permettant d'ouvrir et de fermer des groupes de colonnes. Cela étant impossible avec la fonction de protection de base d'Excel, j'ai utilisé une macro (trouvé dans un forum) pour obtenir le résultat souhaité.
Ca marche très bien !
Aujourd'hui un des utilisateurs de ce fichier me demande de pouvoir modifier la couleur des cellules ... mais ma "macro protectrice" empêche cela.
Auriez vous une astuce à me demander (une ligne de commande en plus à ajouter à ma macro ??) pour garder ma protection, mon ouvrir/fermé de groupes et la coloration des cellules ??
Pour info la macro que j'ai utilisé est celle-ci :
Private Sub Workbook_Open()
With Worksheets("classeur1")
.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="motdepasse", UserInterfaceOnly:=True
End With
End Sub
Merci mille fois d'avance
Natty
J'ai créé un fichier excel. Mon objectif était de pouvoir le protéger via mot de passe tout en permettant d'ouvrir et de fermer des groupes de colonnes. Cela étant impossible avec la fonction de protection de base d'Excel, j'ai utilisé une macro (trouvé dans un forum) pour obtenir le résultat souhaité.
Ca marche très bien !
Aujourd'hui un des utilisateurs de ce fichier me demande de pouvoir modifier la couleur des cellules ... mais ma "macro protectrice" empêche cela.
Auriez vous une astuce à me demander (une ligne de commande en plus à ajouter à ma macro ??) pour garder ma protection, mon ouvrir/fermé de groupes et la coloration des cellules ??
Pour info la macro que j'ai utilisé est celle-ci :
Private Sub Workbook_Open()
With Worksheets("classeur1")
.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="motdepasse", UserInterfaceOnly:=True
End With
End Sub
Merci mille fois d'avance
Natty
A voir également:
- Fichier protégé par une macro comment modifier le format cellule
- Fichier bin - Guide
- Format epub - Guide
- Modifier dns - Guide
- Comment réduire la taille d'un fichier - Guide
- Format factory - Télécharger - Conversion & Codecs
3 réponses
Bonjour
comme cela,
.Protect Contents:=True, Password:="motdepasse", UserInterfaceOnly:=True, Scenarios:=True
comme cela,
.Protect Contents:=True, Password:="motdepasse", UserInterfaceOnly:=True, Scenarios:=True
Re,
alors essaye comme cela
.Protect Password:="motdepasse", DrawingObjects:=False, UserInterfaceOnly:=True, Contents:=True, Scenarios:= _
False, AllowFormattingCells:=True
et avant end sub colle cette ligne
ActiveSheet.EnableSelection = xlNoRestrictions
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
alors essaye comme cela
.Protect Password:="motdepasse", DrawingObjects:=False, UserInterfaceOnly:=True, Contents:=True, Scenarios:= _
False, AllowFormattingCells:=True
et avant end sub colle cette ligne
ActiveSheet.EnableSelection = xlNoRestrictions
End Sub
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.