Classeur protégè à l'ouverture avec VBA et insertion ligne

[bast76]

Bonjour à tous,
Petit souci excel pour les connaisseurs !!
je protège les feuilles de mon classeur via l'événement :"Workbook_Open()" dans VBA --> Thisworkbook afin d'avoir accès au plan et filtre de chaque feuilles et afin que le classeur se protège dés l'ouverture: (de cette façon (bench sur le net))

Private Sub Workbook_Open()
With Worksheets("2")

.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="bastien", UserInterfaceOnly:=True

End With etc .... End Sub

Le problème c'est que je souhaite qu'un utilisateur langda puisse insérer des lignes dans mes tableaux, au niveau des lignes non protéger .
Je sais le faire via l'outil protection etc... mais celui-ci ne me laisse pas accéder au plan (Associer/dissocier).
Ainsi j'aimerais intégrer aux formules présentes dans VBA --> Thisworkbook, une instruction laissant la possibilités d'insertion de ligne pour chaqu'unes des feuilles ( aux endroits (lignes)non protégés des tableaux ).

Merci d'avance. (Mot de passe classeur : "bastien")

Cordialement

 

[Pierrot93]

Re : Classeur protégè à l'ouverture avec VBA et insertion ligne

bonjour Bastien,

pour pouvoir insérer des lignes, modifies ton code comme suit :

Private Sub Workbook_Open()
With Worksheets("2")
.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="bastien", UserInterfaceOnly:=True, _
    AllowInsertingRows:=True
End With
End Sub

bon après midi
@+

 

[bast76]

Re : Classeur protégè à l'ouverture avec VBA et insertion ligne

Bonjour "Pierrot93",
Merci beaucoup de ton aide ! aprés essai --> Ok ! Nickel
Probléme résolu.

Bonne soirée
A+