Automatisches Update eines Pivot Charts

Forumthread: Automatisches Update eines Pivot Charts

21.08.2006 17:27:28

DirkR

Hallo zusammen,
ich habe ein kleines Problem mit einem Pivot Chart, vielleicht könnt Ihr mir dabei helfen:
Ich möchte gerne, dass sich der Pivot Chart jedesmal neue Daten holt (also den Pivot Table aktualisiert) wenn ich eine neues Datenfeld in den Pivot Chart ziehe.
Könnt Ihr mir sagen, an welche Stelle ich das Marco setzen muss, damit es mit dem Update klappt? Oder kann man das evtl. sogar in den Settings vom Pivot Table einstellen?
Danke im voraus für Antwort(en)
Gruss
Dirk

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Automatisches Update eines Pivot Charts

23.08.2006 17:34:32

Heide_Tr
AW: Automatisches Update eines Pivot Charts

24.08.2006 12:25:46

DirkR

AW: Automatisches Update eines Pivot Charts

23.08.2006 17:34:32

Heide_Tr

hallo Dirk,
Du kannst im Ereignis Workbook_SheetPivotTableUpdate (in "DieseArbeitsmappe") eine erneute Aktualisierung der Daten anstoßen. Wichtig ist, über Application.EnableEvents = False die erneute Aktualisierung auszuschalten, damit er nicht in eine Endlosschleife gerät.
viele Grüße. Heide


Private Sub Workbook_SheetPivotTableUpdate(ByVal Sh As Object, ByVal Target As PivotTable)
Application.EnableEvents = False
For Each ws In ActiveWorkbook.Worksheets
For Each pt In ws.PivotTables
pt.PivotCache.Refresh
Next pt
Next ws
Application.EnableEvents = True
End Sub

AW: Automatisches Update eines Pivot Charts

24.08.2006 12:25:46

DirkR

Danke, funktioniert!
Gruss
dirk

Automatisches Update eines Pivot Charts

Forumthread: Automatisches Update eines Pivot Charts

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

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread