Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
632to636
632to636
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

PivotTable DataSource ändern ?

PivotTable DataSource ändern ?
08.07.2005 14:12:13
Gerwas
Folgendes Problem läßt mich nicht mehr richtig schlafen:
es exisitiert eine pivottabelle, die in zeilen bestimmte bereiche und in spalten die monate enthält, die eigentlichen Daten werden als summe ausgegeben.
das ganze mit dem macro-recorder aufgezeichnet sieht so aus:

ActiveSheet.PivotTableWizard SourceType:=xlDatabase, _
SourceData:= _
"[514_10_daten.xls]eingang!R7C1:R19C18", _
TableDestination:="R1C1", _
TableName:="Pivot-Tabelle1"
ActiveSheet.PivotTables("Pivot-Tabelle1").AddFields _
RowFields:="kst", _
ColumnFields:="f_monat"
With ActiveSheet.PivotTables("Pivot-Tabelle1").PivotFields("res1")
.Orientation = xlDataField
.Name = "Verbrauch"
.Function = xlSum
End With
ich möchte jetzt per vba-code SourceData dynamisch erweitern, abhängig davon, wieviele datensätze ich in den bereich geschrieben habe. jedoch bringt mein versuch regelmäßig eine fehlermeldung: "Bezug ist ungültig"
ActiveSheet.PivotTables(1).SourceData = "[514_10_daten.xls]eingang!R7C1:R999C18"
Was muß ich anders machen?

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PivotTable DataSource ändern ?
09.07.2005 09:56:20
Rolf
Hallo G,
du könntest dem Quellbereich einen Namen geben,
und den dann bei der Aufzeichnung eingeben.
Dann musst du später nur noch darauf achten,
dass du entweder neue Daten immer vor der letzten Zeile einfügst,
oder vor der Pivotaktualisierung folgendes Makro ausführst

Sub bereich_redimensionieren()
ActiveWorkbook.Names.Add Name:="Quellbereich", RefersToR1C1:=Range("A1").CurrentRegion
End Sub

fG
Rolf
AW: PivotTable DataSource ändern ?
12.07.2005 09:43:36
Gerwas
Danke
klappt prima...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige