Dieses Mal starten wir gleich den PivotTable-Assistent: <Daten>, <PivotTable- und PivotChart-Bericht…>:
Nach einem Klick auf Weiter können wir den Bereich abändern. Vorher liessen wir es sein, weil hier schon die markierten Zellen angegeben wurden. Aber da wir ja vorher den Bereich noch auf einen dynamischen Bereich geändert haben, machen wir dies gleich jetzt. Also wir geben hier sofort „=Pivot_Daten“ ein:
Deshalb klicken wir erneut auf Weiter.
Excel bemerkt nun, dass wir vorher schon eine Pivot-Tabelle mit genau den gleichen Daten erstellt haben. Deshalb fragt er nach, ob wir dieselbe Quelle benützen möchten. Diese Meldung können wir mit Ja bestätigen.
Nun fragt er noch nach, welche Daten wir verwenden möchten. Da wir nur eine Möglichkeiten haben – jene, Pivot-Tabelle, die wir vorher erstellt haben – wählen wir auch diese aus und bestätigen mit Weiter:
Da wir die Tabelle in einer neuen Arbeitsmappe wollen, behalten wir die Standardeinstellung bei und erstellen die Pivot-Tabelle mit einem Klick auf „Fertig stellen“.
Nach Klick auf „Fertig stellen“ wird die „rohe Pivot-Tabelle“ in einem neuen Tabellenblatt erstellt und wir ziehen nun die Felder entsprechend der Aufgabenstellung auf die entsprechenden Felder.
Dazu klicken wir in der Feldliste (im Beispiel unten ist es auf der rechten Seite) auf den entsprechenden Titel und ziehen diesen mit gedrückt gehaltener, linker Maustaste auf den mit den Pfeilen angezeigten Standort.
Das Resultat sollte ungefähr so aussehen:
Nun öffnen wir die Feldeigenschaften mit einem Doppelklick auf Kunde:
In diesem Dialogfeld können wir noch nicht nur die Top10-Kunden anzeigen, deshalb klicken wir auf „Weitere…“. Hier übernehmen wir folgende Einstellungen:
| • | Links unter „AutoSortieren-Optionen“ wählen wir „Absteigend und verwenden das Feld „Summe vom Umsatz“. Dies dient dazu, den besten Kunden zuoberst anzeigen zu lassen. |
| • | Rechts schalten wir die Top10 ein, die restlichen Einstellungen sollten automatisch so eingestellt sein. |
Dies sollte anschliessend so aussehen:
Wir schliessen das Dialogfeld mit OK und auch die Feldeigenschaften bestätigen wir mit OK.
Aufgrund der Aufgabenstellung lassen wir wiederum nur das erste Quartal anzeigen. Da wir nun nur noch ein Quartal haben, ist das Teilergebnis überfällig geworden. Deshalb blenden wir dies mit einem Doppelklick auf Auftragseingang und dem Anwählen von „Keine“ im erscheinenden Dialogfeld aus:
Wie schon bei dem ersten Beispiel erwähnt, werden In einer Pivot-Tabelle normalerweise die Spaltenbreiten beim Aktualisieren automatisch angepasst. Deshalb schalten wird dies aus. Dazu machen wir irgendwo in der Pivot-Tabelle einen Rechtsklick und wählen <Tabellenoptionen…>. In diesem Fenster deaktivieren wir die Eigenschaft „Tabelle AutoFormatieren“ und klicken anschliessend auf <OK>:
Anschliessend formatieren wir die Tabelle nach unseren Wünschen:
Da unser Chef wie beim ersten Beispiel erwähnt Änderungen vornehmen wird, integrieren wir auch hier eine Funktion, welche die Pivot-Tabelle automatisch aktualisiert, sobald die Tabelle aktiviert wird.
Dazu öffnen wir die Tabelle, welche die PivotTable beinhaltet. In den Blattregisterkarten machen wir auf diese Tabelle einen Rechtsklick und wählen <Code anzeigen>
In dem neu erscheinenden Fenster fügen wir auf der rechten Seite folgenden Code ein:
Private Sub Worksheet_Activate()
Dim pt As PivotTable
For Each pt In Me.PivotTables
pt.RefreshTable
Next
End Sub
Das Fenster könnte dann ungefähr so aussehen:
Anschliessend können wir das Fenster schliessen.
Nun wird jedes Mal, wenn die Tabelle geöffnet wird, die Pivot-Tabelle aktualisiert.