Variabler Bereich für Pivot-Daten
05.07.2002 11:00:34
Patrick
Ich möchte per Makro eine Pivot-Tabelle erstellen. Die Daten-Sheets haben zwar immer die gleiche Spaltenanzahl, jedoch unterschiedlich viele Zeilen. Ich habe die aktiven/vollen Zellen markiert, dennoch werden im Makro feste Zeilen- und Spaltenwerte gespeichert. Wie kann ich bei "SourceData" statt des absoluten Bereiches (hier bis Zeile 551) nur den zuvor markierten/aktiven Bereich festlegen?
(Ich möchte nicht den Zeilenbereich auf 64000 Zeilen festlegen!)
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _"tbl_temp!R1C1:R551C35").CreatePivotTable TableDestination:="", TableName _:="PivotTable1"