eine Pivottabelle mit drei Rowfields sooll nach Datum gruppiert werden (Datum also am innersten).
Beim Erzeugen per Makro frägt Excel, ob der Inhalt des Worksheets, in dem die Tabelle liegt, überschrieben werden soll. Nach herumtesten habe ich herausgefunden, dass es an dieser Zeile (also am Gruppieren selbst) liegt:
With DataSheet
.Cells(9, 4).Group Start:=True, End:=True, Periods:=Array(False, False, False, False, True, False, True)
End With
Aber: wie schalte ich die Meldung aus? DisplayAlerts geht nicht. Hier noch die Tabellenstruktur:
Danke Euch schon mal!
Gruss Florian
With pt
.PivotFields(102).Orientation = xlPageField
.PivotFields(143).Orientation = xlPageField
.PivotFields(7).Orientation = xlRowField
.PivotFields(8).Orientation = xlRowField
.PivotFields(17).Orientation = xlRowField 'Datum
.PivotFields(5).Orientation = xlColumnField
.PivotFields(1).Orientation = xlDataField
.PivotFields(143).CurrentPage = "Auftragseingang"
.PivotFields(102).CurrentPage = "2009"
End With