In diesem Tutorial wird gezeigt, wie Sie animierte Diagramme in allen Excel-Versionen erstellen: 2007, 2010, 2013, 2016 und 2022.
Ein animiertes Excel-Diagramm, das sich vor den Augen Ihres Publikums auf dem Bildschirm zeichnet, ist eine leistungsstarke und aufmerksamkeitsstarke Möglichkeit, Ihre Daten in Bewegung zu setzen.
Im Gegensatz zu statischen Diagrammen bieten animierte Diagramme zusätzlichen Kontext zu Ihren Daten und helfen dabei, aufkommende Muster zu erkennen. Sehen Sie sich als Beispiel das unten gezeigte animierte Liniendiagramm mit Markierungen an, das das BIP von vier Ländern (USA, China, Brasilien und Türkei) in den letzten Jahrzehnten zeigt.
Während das statische Gegenstück nichts Besonderes oder Neues aussehen würde, ermöglicht der animierte Effekt es dem Diagramm, die Geschichte für Sie zu erzählen und die bewegungslosen BIP-Zahlen zum Leben zu erwecken.
In diesem anfängerfreundlichen Tutorial lernen Sie Schritt für Schritt, wie Sie mit Ihren Daten vorgehen – auch wenn Sie gerade Ihre ersten Schritte in Excel machen.
Einstieg
Betrachten Sie die folgende Datentabelle mit den BIP-Zahlen für jedes Land:
Um das Diagramm zu animieren, verwenden wir ein einfaches VBA-Makro, das die Werte glatt in das Diagramm einträgt.
Hinweis: Stellen Sie beim Hinzufügen von VBA-Code zu Ihrer Arbeitsmappe sicher, dass Sie Ihre Arbeitsmappe im XLSM-Format speichern (Microsoft Excel Makro-fähiges Arbeitsblatt), um Makros zu aktivieren.
Jetzt krempeln wir die Ärmel hoch und machen uns an die Arbeit.
Schritt 1: Richten Sie die Hilfsspalten ein.
Erweitern Sie zunächst die Datentabelle mit zusätzlichen Hilfsspalten, in die die tatsächlichen Werte nach und nach kopiert werden, um den Animationseffekt zu erstellen.
Kopieren Sie die Überschriften der Spalten mit den BIP-Zahlen (B2: E2) in die entsprechenden Zellen neben der Datentabelle (F2:I2).
Der hellrot hervorgehobene Zellbereich (F3:I13) definiert den Ort, an dem wir die VBA-Makroausgabe speichern.
Fügen Sie außerdem Dezimaltrennzeichen für den markierten Zellbereich hinzu (Home > Zahl > Kommastil).
Schritt #2: Zeichnen Sie ein leeres Diagramm.
Nachdem Sie den Hilfsspalten etwas Platz zugewiesen haben, erstellen Sie ein leeres 2D-Diagramm mit den Spalten (F2:I13) als Quelldaten:
- Markieren Sie eine beliebige leere Zelle.
- Wechseln Sie zum Einfügung Tab.
- Klicken "Linien- oder Flächendiagramm einfügen.”
- Wählen "Linie mit Markierungen.”
Nachdem wir das getan haben, müssen wir nun das leere Diagramm mit den Zellen in den Hilfsspalten (F: Ich). Klicken Sie mit der rechten Maustaste auf das leere Grundstück und klicken Sie auf „Wählen Sie Daten.”
In dem Datenquelle auswählen Dialogfeld unter „Legendeneinträge (Serie),” drücke auf “Hinzufügen" Taste.
Wenn das Serie bearbeiten Dialogfeld erscheint, erstellen Sie vier neue Datenreihen basierend auf den Hilfsspalten (F: Ich):
- Zum "Serienname,” spezifizieren Sie die Kopfzeilenzelle von Spalte USA (F2).
- Zum "Serienwerte,” wählen Sie den entsprechenden leeren Zellbereich (F3:F13).
Wiederholen Sie den gleichen Vorgang für die verbleibenden drei Spalten.
Nachdem Sie Ihre Datenreihen erstellt haben, importieren Sie die horizontalen Achsenbeschriftungen in das Diagramm.
Dazu unter „Horizontale (Kategorie) Achsenbeschriftungen," drücke den "Bearbeiten" Taste.
In dem Achsenbeschriftungen Dialogfeld unter „Achsenbeschriftungsbereich”, markieren Sie die Achsenwerte (A3: A13).
Hier ist ein Profi-Tipp: Wenn Sie regelmäßig Elemente zur Datentabelle hinzufügen oder daraus entfernen, richten Sie dynamische Diagrammbereiche ein, damit Sie nicht jedes Mal den Quellcode anpassen müssen.
Um das Ganze abzurunden, machen Sie das zukünftige Liniendiagramm noch informativer, indem Sie den Diagrammtitel und die Legende hinzufügen:
- Klicken Sie auf den Diagrammbereich.
- Gehe zum Entwurf Tab.
- Auswählen "Diagrammelemente hinzufügen.”
- Fügen Sie den Diagrammtitel hinzu (Diagrammtitel > über dem Diagramm).
- Fügen Sie die Diagrammlegende hinzu (Legende > Unten).
Schritt #3: Programmieren Sie die VBA, um den animierten Effekt zu erstellen.
Sobald die Quelldaten des Diagramms richtig eingerichtet wurden, kommt als nächstes der schwierige Teil, das VBA-Makro zu schreiben, das mit nur einem Klick die ganze schmutzige Arbeit für Sie erledigt.
Bevor wir ins Wesentliche eintauchen, vergewissern Sie sich, dass Sie die Registerkarte "Entwickler" in der Multifunktionsleiste angezeigt. Wenn es deaktiviert ist, klicken Sie mit der rechten Maustaste auf eine leere Stelle im Schleife und wähle „Anpassen der Multifunktionsleiste“ aus dem angezeigten Menü.
In dem Excel-Optionen Dialogfeld, aktivieren Sie das „Entwickler” Kästchen und klicken Sie auf “OK.”
Nachdem dies geschehen ist, ist es an der Zeit, das Kraken von Excel zu veröffentlichen, die Funktion, die die Grenzen des Möglichen in der Welt der Tabellenkalkulationen überschreitet. Es ist an der Zeit, die Kraft der VBA zu entfesseln.
Öffnen Sie zunächst den VBA-Editor:
- Navigieren Sie zum Entwickler Tab.
- Drücke den "Visual Basic" Taste.
Wählen Sie im Editor das Einfügung Registerkarte und wählen Sie „Modul.”
Kopieren Sie dort das folgende Makro in das Codefenster:
| 123456789101112131415161718192021222324 | Unter Animated_Chart()'Variablen deklarierenConst StartRow As Long = 2Letzte Zeile so lang dimmenDim RowNumber As Long'Letzte Datenzeile abrufenLastRow = Range("A" & StartRow).End(xlDown).Row'Diagramm löschen & leeres Diagramm anzeigenRange("F" & StartRow, "I" & LastRow).ClearContentsDoEventsApplication.Wait (Jetzt + TimeValue("00:00:1"))'Schritte durch jede ChartperiodeFor RowNumber = StartRow To LastRowDoEventsRange("F" & RowNumber, "I" & RowNumber).Wert = Range("B" & RowNumber, "E" & RowNumber).WertApplication.Wait (Jetzt + TimeValue("00:00:1"))DoEventsNächste ZeilennummerEnd Sub |
Auf den ersten Blick mag der Code für VBA-Neulinge abschreckend erscheinen, aber in Wirklichkeit sind es nur wenige einfache Schritte, um den Code an Ihre Bedürfnisse anzupassen.
Grundsätzlich kann der Code in vier Abschnitte unterteilt werden, wie im Screenshot unten gezeigt. Die grünen Rechtecke stellen die Abschnitte des Codes dar, die auf Ihre Daten zugeschnitten werden müssen – während der Rest unverändert bleiben sollte.
Lassen Sie uns die Teile heranzoomen, die Sie für die Feinabstimmung benötigen. Schauen Sie sich zu Ihrer Bequemlichkeit noch einmal die Datentabelle an und folgen Sie meinen Fußstapfen:
Variablen deklarieren: Dieser Abschnitt führt neue Variablen ein, mit denen die VBA arbeiten kann. In unserem Fall ist die Konstante mit der Bezeichnung „StartReihe” hilft der VBA herauszufinden, wo die Datentabelle beginnt (Reihe 2). Daher sollte der konstante Wert der Zeile entsprechen, in der Ihre Daten beginnen.
| 1 | Const StartRow As Long = 2 |
Letzte Datenzeile abrufen: Diese Codezeile weist den VBA an, die Datentabelle zu analysieren und zu definieren, wo die Datentabelle endet (Reihe 13), sodass später nur die Werte innerhalb des angegebenen Zellbereichs vergrößert werden können, während der Rest des Arbeitsblatts weggelassen wird.
Um es abzurufen, geben Sie die erste Spalte an ("EIN") wo die Datentabelle beginnt, damit der VBA die letzte Zeile in dieser Spalte findet, die eine nicht leere Zelle enthält (Spalte A).
| 1 | LastRow = Range("A" & StartRow).End(xlDown).Row |
Diagramm löschen & leeres Diagramm anzeigen: Dieser Abschnitt ist für das Löschen der Werte in den Hilfsspalten (F: Ich) jedes Mal, wenn Sie das Makro ausführen.
Auf diese Weise können Sie den gleichen animierten Effekt immer wieder wiederholen, ohne die Arbeitsblattzellen selbst bereinigen zu müssen. Geben Sie zum Anpassen die erste und letzte Hilfsspalte in Ihrer Datentabelle an („F“ und „Ich“).
| 1 | Range("F" & StartRow, "I" & LastRow).ClearContents |
Gehen Sie durch jede Diagrammperiode: Hier passiert die ganze Magie. Nachdem der Zellenbereich ausgewählt wurde, geht der VBA Zeile für Zeile durch und füllt die Hilfsspalten in Sekundenintervallen mit den entsprechenden tatsächlichen Werten, wodurch der animierte Effekt effektiv erzeugt wird.
Um es durchzuziehen, müssen Sie nur diese Codezeile ändern, damit die VBA die Werte in die Hilfsspalten kopiert:
| 1 | Range("F" & RowNumber, "I" & RowNumber).Wert = Range("B" & RowNumber, "E" & RowNumber).Wert |
Der erste Teil des Codes (Range("F" & RowNumber, "I" & RowNumber).Wert) greift alle Hilfsspalten in der Datentabelle (F: Ich) während der zweite Teil der Gleichung (Range("B" & RowNumber, "E" & RowNumber).Wert) ist dafür verantwortlich, die tatsächlichen Werte in sie zu importieren.
In Anbetracht dessen ist die "F" und "ICH" Werte kennzeichnen die erste und letzte Hilfsspalte (Spalten F und I). Aus dem gleichen Grund, "B" und "E" stehen für die erste und letzte Spalte, die die tatsächlichen BIP-Zahlen enthalten (Spalten B und E).
Wenn Sie das alles geschafft haben, klicken Sie auf das Diskettensymbol, um den VBA-Code zu speichern und den Editor zu schließen.
Schritt 4: Erstellen Sie die Makroschaltfläche.
Um die Arbeitsblattdaten und das neu erstellte Makro zu verknüpfen, richten Sie eine Schaltfläche zum Ausführen des VBA-Codes ein.
- Gehe zum Entwickler Tab.
- Drücke den "Einfügung" Taste.
- Unter "Formularsteuerelemente," auswählen "Schaltfläche (Formularsteuerung).”
Klicken Sie an die Stelle, an der Sie die Schaltfläche platzieren möchten (vorzugsweise in der Nähe des Diagrammtitels). An diesem Punkt ist die Makro zuweisen Dialogfeld erscheint. Wählen Sie das gerade erstellte VBA-Makro aus (Animated_Chart) und klicken Sie auf „OK.”
Als letzte Anpassung ändern Sie den Schaltflächentext (Doppelklicken Sie auf den Schaltflächentext und benennen Sie ihn um). Verschieben Sie die Schaltfläche ggf. an die gewünschte Position.
Klicken Sie nun auf die Schaltfläche und beobachten Sie, wie die VBA das leere Diagramm reibungslos mit den tatsächlichen Werten füllt - und das Schöne an dieser Methode ist, dass Sie den zugrunde liegenden Diagrammtyp mit nur wenigen Klicks ändern können, ohne erneut durch alle Rahmen springen zu müssen!
So wird es gemacht. Das Animieren Ihrer Excel-Diagramme kann eine großartige Möglichkeit sein, Ihren Daten eine einzigartige Perspektive zu geben, die Sie sonst übersehen hätten.
Offensichtlich kann es einige Zeit dauern, bis Sie die Logik hinter dem VBA-Code wirklich verstehen. Da jedoch derselbe Code für verschiedene Datentypen und Diagramme immer wieder verwendet werden kann, lohnt es sich, es auszuprobieren. Sobald Sie die kurze Lernkurve hinter sich haben, steht Ihnen die Welt zu Füßen.
