Summary Property Example
This example formats row four on Sheet1 as bold and italic if it’s an outlining summary column.
With Worksheets("Sheet1").Rows(4) If .Summary = True Then .Font.Bold = True .Font.Italic = True End If End With