Hallo zusammen,
ich habe ein Makro, mit dem ich einen bestimmten Datensatz, dessen Länge variiert, in eine Pivot umwandeln lasse.
Ich benutze dazu folgenden Code:
Range("M15").Select
Range(Selection, Selection.End(xlToLeft)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlDown)).Select
Sheets.Add
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Report!R15C1:R53C13", Version:=xlPivotTableVersion15).CreatePivotTable _
TableDestination:="Tabelle1!R3C1", TableName:="PivotTable1", _
DefaultVersion:=xlPivotTableVersion15
Sheets("Tabelle1").Select
Cells(3, 1).Select
Mein Problem ist nun, dass Excel nun nur bis zu einem bestimmten Punkt senkrecht Daten auswählt. Ich möchte aber, dass die Länge variabel ist, also dass Excel sich jeweils alle Daten zieht, abhängig davon wie lang die Tabelle ist.
Hat jemand von euch eine Lösung dafür?
LG
Emanuel