Bonjour,
Tu as les plans dans 'Données / Plan'
Comme tu apprends, à faire en pas à pas pour voir l'effet de chaque méthode sur la feuille :
Sub plans()
'mettre des plans
Rows("5:9").Rows.Group
Rows("12:15").Rows.Group
Rows("20:23").Rows.Group
' replier tous les plans
ActiveSheet.Outline.ShowLevels RowLevels:=1
'déplier un plan
Rows(12).ShowDetail = True
Rows(20).ShowDetail = True
'replier un plan
Rows(12).ShowDetail = False
'déplier tous les plans niveau 2
ActiveSheet.Outline.ShowLevels RowLevels:=2
' supprimer un plan
Rows("5:9").Rows.Ungroup
End Sub
eric