Groupements par macro

Bonjour,

J'ai le besoin de grouper des lignes à partir d'une macro. J'ai pour cela utilisé le code suivant :

 'a et b les numéros de lignes :

a = 2
b = 6

plage = a & ":" & b

Rows(plage).Select                      'Sélection de la plage de données

Selection.Rows.Group                    'Groupement par ligne de la sélection
Selection.EntireRow.Hidden = True       'Masquage des lignes groupées (repli)

Ce code fonctionne (je parviens à grouper les lignes 2 à 6), mais le bouton "+" qui permet de dérouler est de base sous le groupement, ce qui ne me convient pas.

Mon problème est donc le suivant :

Existe-t-il un moyen de modifier le paramètre "Lignes de synthèse sous les lignes de détail" depuis VBA, sans avoir à décocher la case manuellement,

Cordialement,

MONIER Théo

J'ai résolu mon problème :

Il me suffisait d'enregistrer une macro dans laquelle je décoche la case "Lignes de synthèse sous les lignes de détail", dans la partie "Plan" de l'onglet "Données".

J'en ai récupéré le code et l'ai inclus dans mon code précédent :

'a et b les numéros de lignes :
    a = 2
    b = 6

    plage = a & ":" & b

    Rows(plage).Select                      'Sélection de la plage de données

    Selection.Rows.Group                    'Groupement par lignes de la sélection
    Selection.EntireRow.Hidden = True       'Masquage des lignes groupées

'Regroupements vers le bas :
    With ActiveSheet.Outline
        .AutomaticStyles = False
        .SummaryRow = xlAbove
        .SummaryColumn = xlRight
    End With