ich möchte per VBA den Datenbereich einer Pivot anpassen:
per Variable "anz_zeilen" zähle ich die letzte Zeile eines Tabellenblattes
anz_zeilen = ActiveSheet.Range("A1").Offset(ActiveSheet.Rows.Count - 1, 0).End(xlUp).Row
diese soll dann die letzte Zeile des Pivot Datenbereiches werden. Hier der Code
ActiveSheet.PivotTables("PivotTable4").ChangePivotCache ActiveWorkbook. _
PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Aufträge!A1:BX" & anz_zeilen _
, Version:=xlPivotTableVersion14)
Aber jedenmal wenn ich danach mit dem Excel File arbeite kommt diese Fehlermeldung:
"Der Pivot Table Bericht wurde ohne die zugrunde liegenden Quelldaten gespeichert. Wählen Sie den Befehl Daten aktulisieren, um den Bericht zu aktualisieren.
Ich muss dann erst die besagte Pivot aktualisieren, dann geht das File wieder.
Meine Vermutung ist der PivotCache der neu generiert wird. Kann man das verhindern?
Gruß David