Range.AutoOutline (Excel)

Erstellt automatisch eine Gliederung für den angegebenen Bereich.

Worksheets("Sheet1").Range("A1:G37").AutoOutline