Tutorials

Tutorial: So erstellst du einen animierten, funkelnden Weihnachtsbaum in Excel

Melden

Hier ist ein ausführliches Tutorial, wie du einen festlichen, animierten Weihnachtsbaum in Excel erstellst. Wir nutzen dafür eine Kombination aus Zellformatierung, Zufallsformeln und einem kleinen VBA-Makro für den Animationseffekt.

Diese Anleitung führt dich Schritt für Schritt durch das Projekt – von der Zeichnung des Baums bis hin zur Programmierung der blinkenden Lichter.

Schritt 1: Das Raster vorbereiten

Damit der Baum gut aussieht, benötigen wir quadratische Zellen.

  1. Öffne ein leeres Excel-Blatt.
  2. Klicke auf das kleine Dreieck oben links (zwischen Spalte A und Zeile 1), um das gesamte Blatt zu markieren.
  3. Rechtsklick auf einen Spaltenkopf -> Spaltenbreite auf 2 setzen.
  4. Rechtsklick auf einen Zeilenkopf -> Zeilenhöhe auf 15 setzen. Nun hast du ein feines Gitternetz.

Schritt 2: Den Baum „zeichnen“

Wir markieren nun die Zellen, die den Baum bilden.

  1. Wähle einen Bereich in der Mitte (z. B. Spalte J) und beginne oben mit einer Zelle für die Spitze.
  2. Markiere in den Zeilen darunter immer mehr Zellen in die Breite, um eine Dreiecksform zu bilden.
  3. Halte die STRG-Taste gedrückt und klicke auf verschiedene Zellen innerhalb des Baums, um die „Lichter“ zu verteilen.
  4. Fülle den restlichen Baum (die Nadeln) mit einer dunkelgrünen Hintergrundfarbe.
  5. Färbe unten 2-3 Zellen braun für den Stamm.

Schritt 3: Die Logik für die blinkenden Lichter

Damit die Lichter funkeln, nutzen wir eine Zufallszahl.

  1. Markiere alle Zellen, die du als „Lichter“ ausgewählt hast (während du STRG gedrückt hältst).
  2. Gib oben in die Bearbeitungszeile folgende Formel ein: =ZUFALLSBEREICH(1;5)
  3. Drücke STRG + ENTER, damit die Formel in alle markierten Zellen gleichzeitig übernommen wird. Jetzt stehen überall Zahlen zwischen 1 und 5 in den Licht-Zellen.

Schritt 4: Die Lichter bunt machen (Bedingte Formatierung)

Jetzt geben wir den Zahlen Farben.

  1. Markiere erneut alle Licht-Zellen.
  2. Gehe auf Start > Bedingte Formatierung > Neue Regel.
  3. Wähle „Nur Zellen formatieren, die enthalten“.
  4. Stelle ein: Zellwert ist gleich 1. Klicke auf Formatieren und wähle unter Ausfüllen die Farbe Rot.
  5. Wiederhole diesen Vorgang für die Zahlen 2 bis 5 mit anderen Farben (Gelb, Blau, Weiß, Orange).
  6. (Optional) Setze die Schriftfarbe in diesen Regeln auf die gleiche Farbe wie die Hintergrundfarbe, damit man die Zahlen nicht sieht.

Schritt 5: Die Animation mit VBA aktivieren

Excel berechnet Zufallszahlen nur neu, wenn sich im Blatt etwas ändert. Wir brauchen ein Makro, das dies automatisch tut.

  1. Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Gehe auf Einfügen > Modul.
  3. Kopiere den folgenden Code in das Fenster:
Dim AnimationLaeuft As Boolean

Sub WeihnachtsBaumStart()
    AnimationLaeuft = True
    Do While AnimationLaeuft = True
        DoEvents ' Verhindert, dass Excel einfriert
        Calculate ' Berechnet die Zufallszahlen neu
        Application.Wait (Now + TimeValue("0:00:01")) ' Geschwindigkeit (1 Sekunde)
    Loop
End Sub

Sub WeihnachtsBaumStop()
    AnimationLaeuft = False
End Sub
  1. Schließe das VBA-Fenster.

Schritt 6: Start- und Stopp-Buttons hinzufügen

Damit du die Animation bequem steuern kannst:

  1. Gehe auf das Register Einfügen > Illustrationen > Formen und zeichne zwei abgerundete Rechtecke.
  2. Beschrifte eines mit „Start“ und das andere mit „Stopp“.
  3. Rechtsklick auf den Start-Button -> Makro zuweisen -> Wähle WeihnachtsBaumStart.
  4. Rechtsklick auf den Stopp-Button -> Makro zuweisen -> Wähle WeihnachtsBaumStop.

Schritt 7: Der Feinschliff

  1. Gehe auf das Register Ansicht und entferne den Haken bei Gitternetzlinien.
  2. Färbe den Hintergrund um den Baum herum dunkelblau oder schwarz, um eine Nacht-Optik zu erzeugen.
  3. Klicke auf deinen Start-Button – dein Baum sollte nun im Sekundentakt die Farben seiner Lichter ändern!

Wichtiger Hinweis: Speichere die Datei unbedingt als Excel-Arbeitsmappe mit Makros (.xlsm) ab, sonst geht der VBA-Code verloren!

Viel Spaß beim Nachbauen und frohe Weihnachten! 🎄✨

0