Hallo,
gibt es eine Möglichkeit per VBA auszulesen, ob in einem sheet Teilergebnisse eingestellt sind? Bei Autofilter z.B. ist das ja einfach (AutoFilterMode). In meinem Versuch hier funktioniert nur das Entfernen, nicht aber die Abfrage. Gibt aber auch keinen Fehler aus..?
Dim sh as worksheet
If sh.Range("A1").CurrentRegion = Range("A1").CurrentRegion.Subtotals Then
MsgBox "Das Blatt enthält Teilergebnisse! Die Gliederung wird entfernt."
sh.Range("A1").CurrentRegion.RemoveSubtotal
End If
Vielen herzlichen!
Heinz