Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: pivot in verstecktem tabellenblatt aktualisieren

pivot in verstecktem tabellenblatt aktualisieren
david.a2k
Hallo,
ich habe ein Excel File mit 6 Tabellenblättern wovon fünf standardmäßig ausgeblendet sind.
In allen versteckten Tabellenblättern gibt es Pivot Tabellen.
In dem nicht versteckten Tabellenblatt kann man per Button/Makro alle diese Pivot Tabellen aktualisieren.
Ich schaffe das aber nur indem ich jedes einzelne Tabellenblatt erst einblenden lasse, dann die Pivot aktualisieren lasse und dann das Tabellenblatt wieder ausblende, das ganze eben fünf mal.
Kann man das auch machen ohne die Tabellenblätter einzublenden?
Oder als Alternative zumidnest das so zu machen, dass es der Benutzter nicht sieht?
Danke und Gruß
David
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: pivot in verstecktem tabellenblatt aktualisieren
02.08.2012 15:11:34
fcs
Hallo David,
mit nachfolgenden Makros sollte es ohne Einblenden der Blätter funktionieren.
Gruß
Franz
Sub Pivots_Aktualisieren()
'Namen der Tabellenblatts mit Pivot anpassen
Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot1"))
Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot2"))
Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot3"))
Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot4"))
Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot5"))
End Sub
Sub PivotUpdate(wks As Worksheet)
Dim pvTab As PivotTable
For Each pvTab In wks.PivotTables
pvTab.RefreshTable
Next
End Sub

Anzeige
AW: pivot in verstecktem tabellenblatt aktualisieren
02.08.2012 15:17:47
Rudi
Hallo,
Sub RefreshPivot()
Dim Wks As Worksheet
Dim pt As PivotTable
Application.ScreenUpdating = False
For Each Wks In Worksheets
For Each pt In Wks.PivotTables
pt.RefreshTable
Next pt
Next Wks
Application.ScreenUpdating = True
End Sub

Gruß
Rudi
Anzeige
AW: pivot in verstecktem tabellenblatt aktualisieren
02.08.2012 16:25:59
david.a2k
Vielen Dank beiden Antworten.
Hat mir weitergeholfen.
Gruß
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Pivot-Tabellen in versteckten Tabellenblättern aktualisieren


Schritt-für-Schritt-Anleitung

Um alle Pivot-Tabellen in versteckten Tabellenblättern zu aktualisieren, ohne diese anzuzeigen, kannst Du ein VBA-Makro verwenden. Hier ist eine einfache Anleitung, wie Du das umsetzen kannst:

  1. Öffne Deine Excel-Datei.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Füge den folgenden Code in das Modul ein:

    Sub Pivots_Aktualisieren()
       ' Namen der Tabellenblätter mit Pivot anpassen
       Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot1"))
       Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot2"))
       Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot3"))
       Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot4"))
       Call PivotUpdate(ActiveWorkbook.Worksheets("Pivot5"))
    End Sub
    
    Sub PivotUpdate(wks As Worksheet)
       Dim pvTab As PivotTable
       For Each pvTab In wks.PivotTables
           pvTab.RefreshTable
       Next
    End Sub
  5. Schließe den VBA-Editor und kehre zu Excel zurück.

  6. Du kannst nun das Makro ausführen, um alle Pivot-Tabellen zu aktualisieren, ohne die Tabellenblätter einblenden zu müssen.


Häufige Fehler und Lösungen

  • Pivot aktualisiert sich nicht: Stelle sicher, dass die Namen der Tabellenblätter im VBA-Code korrekt sind. Ein Schreibfehler führt dazu, dass das Makro nicht funktioniert.

  • Makro läuft nicht: Überprüfe, ob die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center und aktiviere die Makros.

  • Excel stürzt ab: Dies kann passieren, wenn das Makro sehr viele Daten verarbeitet. Probiere, die Aktualisierung in kleineren Schritten durchzuführen.


Alternative Methoden

Falls Du keine Makros verwenden möchtest, gibt es einige alternative Methoden, um deine Pivot-Tabellen zu aktualisieren:

  1. Pivot-Tabelle aktualisieren Button: Du kannst einen Button in Deinem Arbeitsblatt einfügen, der die Pivot-Tabelle aktualisiert. Dies ist jedoch weniger komfortabel als ein VBA-Makro.

  2. Manuelle Aktualisierung: Klicke mit der rechten Maustaste auf die Pivot-Tabelle und wähle Aktualisieren. Dies funktioniert jedoch nur für sichtbare Tabellen.

  3. Excel Pivot automatisch aktualisieren: Du kannst auch einstellen, dass sich die Pivot-Tabelle automatisch aktualisiert, wenn Du die Datenquelle änderst. Gehe zu den Pivot-Tabelleneinstellungen und aktiviere die Option Daten beim Öffnen der Datei aktualisieren.


Praktische Beispiele

Hier sind einige Beispiele, wie Du verschiedene Pivot-Tabellen aktualisieren kannst:

  • Aktualisieren einer einzelnen Pivot-Tabelle:

    Sub EinzelnePivotAktualisieren()
       Dim pt As PivotTable
       Set pt = Worksheets("Pivot1").PivotTables(1) 'Die erste Pivot-Tabelle auf dem Blatt
       pt.RefreshTable
    End Sub
  • Aktualisieren aller Pivot-Tabellen in einem Arbeitsblatt:

    Sub AllePivotsImBlattAktualisieren()
       Dim pt As PivotTable
       For Each pt In Worksheets("Pivot1").PivotTables
           pt.RefreshTable
       Next pt
    End Sub

Tipps für Profis

  • VBA optimieren: Nutze Application.ScreenUpdating = False und Application.ScreenUpdating = True, um die Aktualisierung der Anzeige zu beschleunigen und Flackern zu vermeiden.

  • Fehlerbehandlung: Implementiere Fehlerbehandlungsroutinen in Deinen VBA-Skripten, um Probleme beim Aktualisieren zu erkennen und zu beheben.

  • Regelmäßige Updates: Denke daran, die Pivot-Tabellen regelmäßig zu aktualisieren, insbesondere wenn sich die zugrunde liegenden Daten ändern.


FAQ: Häufige Fragen

1. Wie kann ich alle Pivot-Tabellen in Excel automatisch aktualisieren?
Du kannst die Pivot-Tabellen so einstellen, dass sie sich beim Öffnen der Datei automatisch aktualisieren. Dies findest du in den Pivot-Tabelleneinstellungen.

2. Was tun, wenn eine Pivot-Tabelle sich nicht aktualisiert?
Überprüfe, ob die Datenquelle korrekt ist und ob das Makro ohne Fehler ausgeführt wird. Achte darauf, dass die Pivot-Tabelle nicht auf ein ausgeblendetes Blatt verweist.

3. Gibt es eine Möglichkeit, Pivot-Tabellen ohne VBA zu aktualisieren?
Ja, du kannst Pivot-Tabellen manuell aktualisieren, indem du mit der rechten Maustaste auf die Tabelle klickst und Aktualisieren wählst, aber dies ist weniger effizient für viele Tabellen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige