Hallo zusammen,
ich will in einem Makro für eine Pivot-Tabelle den Bereich der Ursprungsdaten passend angeben (ändert sich nämlich).
Letzte Zeile und letzte Spalte sind bekannt (LetzteZ, LetzteSp).
Mit festen Werten ist das Erstellen der Pivot-Tabelle kein Problem:
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"A_Tabelle3!R1C1:R140C21")
.CreatePivotTable TableDestination:="'Roh-Matrix'!R3C1", TableName:="PivotTable2", _
DefaultVersion:=xlPivotTableVersion10
End With
Ich würde aber gern LetzteZ und LetzteSp benutzen, ungefähr so:
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"A_Tabelle3!R1C1:R & LetzteZ & C & LetzteSp & ")
.CreatePivotTable TableDestination:="'Blatt2'!R3C1", TableName:="PivotTable2", _
DefaultVersion:=xlPivotTableVersion10
End With
Leider liefert das die Fehlermeldung
Laufzeitfehler '1004': Bezug ist ungültig.
und der Cursor bleibt auf der Zeile ".CreatePivotTable..." stehen.
Kann mir jemand einen Tipp geben, wie das zum Laufen kommt?
Danke vorab,
Volker