Ich bin auf der Suche nach einer Lösung für folgendes Problem:
Ich habe eine Excel-Arbeitsmappe zusammengestellt, die folgende Tabellenblätter beinhaltet:
In Tabelle 3 und 4 generiere ich jeweils eine Pivot-Tabelle aus den Daten der Tabelle 2.
Die beiden Pivot-Tabellen habe ich mittels Verknüpftes Bild in Tabelle 1 eingefügt.
Tabelle 5 dient lediglich zur Generierung von DropDown-Listen.
Da die Datei auch von anderen (noch unbedarfteren) als mir benutzt werden soll, möchte ich die beiden Tabellenblätter mit den Pivot-Tabellen mit Blattschutz sperren. Dem Nutzer soll es also lediglich in Tabelle 2 möglich sein, Eintragungen zu machen.
Dann möchte ich jedoch, dass bei Aufruf der Tabelle 1 eine automatische Aktualisierung der Pivot-Tabellen - und damit einhergehend der Bilder auf Tabelle 1 - durchgeführt wird.
Ich habe mir bisher folgenden Code auf Tabelle 1 geschrieben:
Sub ErgebnisseAktualisieren()
'Dieses Makro aktualisiert die vorhandenen Pivot-Tabellen bei öffnen des Tabellenblatt " _
Ergebnisansicht"
Tabelle3.Activate
Tabelle4.Activate
Dim pt As PivotTable
ActiveSheets.Unprotect
For Each pt In ActiveSheet.PivotTables
pt.RefreshTable
Next pt
ActiveSheets.Protect
End Sub
Leider gibt es damit noch Kompilierungsfehler (Laufzeitfehler "424"), die ich nicht entziffern kann.
Versteht jemand meine Zielidee und kann mir helfen?