Procédure pour choisir des lignes groupées à dissossier

Bonjour,

Je démarre sur VBA et je souhaite trouver une procédure pour choisir des lignes groupées et puis les dissocier.

En effet, j'ai groupé plusieurs lignes sur une feuille séparément et je veux les dissocier au fur et à mesure.

Ainsi, j'ai : Groupe 1 : ligne 6 à ligne 33; Groupe 2: ligne 35 à ligne 75 et Groupe 3: ligne 77 à ligne 90

Le code suivant dissocie tous les groupes de la feuille : ActiveSheet.Outline.ShowLevels RowLevels:=2

Je souhaite dissocier uniquement le groupe 1 et laisser les autres groupés sur la même feuille.

Voici le code que j'essayesans succès : ActiveSheet.Range("A6:O33").Select.Outline.ShowLevels RowLevels:=2

Que faut il faire ?

Merci pour votre aide