Protection avec autorisation ouverture/fermeture groupe colonne

Bonjour,

J'ai une macro (ci-dessous) pour protéger plusieurs feuilles avec des autorisations spécifiques parmi lesquelles celle permettant d'ouvrir/fermer les colonne groupées.

Elle fonctionne bien, à un détail près : Je peux fermer/ouvrir en cliquant sur le bouton "+" en haut de la page mais pas en cliquant sur les numéro du niveau de groupement (en haut à gauche de la page) !

Voici le code :

Dim FL As Worksheet
    For Each FL In Worksheets

        FL.Protect ("MotDePasse"),
        DrawingObjects:=False, _
        Contents:=True, _
        Scenarios:=True, _
        AllowFormattingCells:=True, _
        AllowFormattingColumns:=True, _
        AllowFormattingRows:=True, _
        AllowInsertingColumns:=False, _
        AllowInsertingRows:=True, _
        AllowInsertingHyperlinks:=True, _
        AllowDeletingColumns:=False, _
        AllowDeletingRows:=True, _
        AllowSorting:=True, _
        AllowFiltering:=True, _
        AllowUsingPivotTables:=True
        FL.EnableOutlining = True

    Next FL
End Sub

Une idée ? Merci par avance

Remplacez ce morceau de code et placez le à la fin des conditions de protection :

FL.Protect "MotDePasse", Userinterfaceonly:=True

Merci de passer en résolu votre sujet si ce dernier l'est.

Cdlt,

Maiiiis, ça marche !

J'avais cette formulation avant de poster le code, que j'ai finalement supprimé vu que ça ne marchais pas et je croyais que c'était faux.

Quand je dis ça ne marchais pas, je ne pouvais même pas sauvegarder ... Bon bref ! ça marche

MERCI