Summary 属性

       

如果指定区域为分级显示的汇总行或汇总列,则该值为 True。该区域应为一行或一列。Variant 类型,只读。

示例

如果工作表 Sheet1 上第四行为分级显示的汇总行,则本示例将其字体设置为加粗和倾斜。

With Worksheets("Sheet1").Rows(4)
    If .Summary = True Then
        .Font.Bold = True
        .Font.Italic = True
    End If
End With