Range.Summary (Excel)

True, wenn es sich bei dem Bereich um eine Hauptzeile oder Hauptspalte einer Gliederung handelt.

Dim booSummary As Boolean
booSummary = ActiveCell.Summary