Macro feuille protégée - insertion de lignes

Bonjour,

pour un fichier avec un onglet "generic template" protégé, j'ai besoin d'autoriser la fonction grouper/dégrouper (les groupes de lignes avec les +) mais j'ai aussi besoin d'autoriser l'ajout de lignes.
Aucun souci pour l'utilisation, une fois protégé, du grouper/dégrouper, en revanche impossible d'ajouter des lignes mêmes en cochant la fonction lors de la protection. Il doit me manquer quelque chose...
Help s'il vous plait
Un grand merci d'avance.

Voici la macro

Private Sub Workbook_Open()
  With Worksheets("GENERIC TEMPLATE")
    .EnableAutoFilter = True
    .EnableOutlining = True
    .Protect Contents:=True, Password:="AB", UserInterfaceOnly:=True
  End With
End Sub

Bonjour, si toutes les cellules de cette feuilles sont protégées alors autoriser l'insertion de ligne n'est d'aucune utilité car la ligne insérée sera elle

même protégée en écriture.

Cependant si vous utiliser l'enregistreur macro vous obtiendrez facilement les lignes de codes qui correspondent au options cochées lors de la protection.

Bonjour XMenpl,

Je ne suis pas très douée, mais quand même lol... toutes les cellules ne sont pas verrouillées!
Les lignes sont à remplir donc vides. Donc déverrouillées.

J'ai déjà essayé avec l'enregistreur de macros, mais cela ne fonctionne pas....
Je vais retenter.

Merci!

Les options de protection sont "autoriser l'insertion de ligne".

Vous indiquez ajout de ligne ? ce n'est pas pareil. sans fichier exemple difficile de voir ce qui est protégé et ce qui ne l'ai pas ?

Personnellement quand j'utilise l'enregistreur j'ai une formulation du type :

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowInsertingRows:=True, AllowFiltering:=True

Bonjour,

J'ai réussi à corriger et à améliorer:

Private Sub Workbook_Open()
Dim WS_Count As Integer
Dim I As Integer

WS_Count = ActiveWorkbook.Worksheets.Count
For I = 1 To WS_Count
With ActiveWorkbook.Worksheets(I)
    .EnableAutoFilter = True
    .EnableOutlining = True
    .Protect Contents:=True, Password:="AB", UserInterfaceOnly:=True, AllowInsertingRows:=True
  End With
  Next I
End Sub

Me reste néanmoins un souci: la macro ne fonctionne pas sur MAC, et j'ai du mal à comprendre pourquoi...