Worksheet.Outline (Excel)

Returns an Outline object that represents the outline for the specified worksheet.

Worksheets("Sheet1").Outline.AutomaticStyles = True