Ein Countdown-Zähler in einem Excel-Arbeitsblatt einfügen

Ein Countdown-Zähler in einer Excel-Tabelle könnte hilfreich sein, auf einem zeitbezogenen Blatt, so dass der Benutzer zu verfolgen wie viel Zeit sie vor einem bestimmten Ereignis oder Frist verlassen haben. Während Excel eine Countdown-Funktion oder ein Feature nicht haben, können Sie die integrierte Visual Basic für Applikationen (VBA) Programmiersprache erstellen Sie einen Countdown in einer einzigen Excel-Zelle.

Anweisungen

1 Öffnen Sie das Excel 2010-Arbeitsblatt, in dem Sie einen Countdowntimer hinzufügen möchten. Mit der rechten Maustaste der Zelle, wo Sie wollen, den Timer zu gehen und wählen "Zellen formatieren". Klicken Sie auf "Custom" auf der linken Seite des Fensters, der erscheint und wählen Sie dann "Standardzeitformat" aus der Liste auf der rechten Seite. Klicken Sie auf "OK", um fortzufahren.

2 Halten Sie die "Alt" und drücken Sie "F11", um die VBA-Konsole zu öffnen. Wählen Sie Ihren aktuelle Arbeitsblatt aus der Liste auf der linken Seite der Konsole. Klicken Sie auf den kleinen Pfeil neben der Schaltfläche "Einfügen Userform" am oberen Bildschirmrand, die die zweite Schaltfläche von Links ist, und wählen Sie "Modul" aus der Liste der angezeigten Optionen. Doppelklicken Sie auf "Modul 1" in der Liste angezeigt wird.

3 Klicken Sie auf die weiße Fläche auf der rechten Seite des Bildschirms, und geben Sie den folgenden Code:

Sub Countup()

Dim CountDown As Date

CountDown = Now + TimeValue("00:00:01")

Application.OnTime CountDown, "Realcount"

EndSub

Dieser Code ermöglicht es den Rest des Codes, einmal pro Sekunde zu verarbeiten.

4 Drücken Sie enter, um eine neue Zeile auf der Seite zuzugreifen. Geben Sie folgenden Code:

Sub Realcount()

Dim count As Range

Set count = [E1]

count.Value = count.Value - TimeSerial(0, 0, 1)

If count <= 0 Then

MsgBox "Countdown complete."

Exit Sub

End If

Call Countup

EndSub

Ändern Sie "E1", in welcher Zelle, die Sie für den Countdown verwenden möchten. Dieser Code führt die eigentliche Countdown und prüft, ob der Countdown beendet ist.

5 Klicken Sie auf das "X" in der oberen rechten Ecke der Konsole zu schließen.

6 Markieren Sie die Zelle, dass Sie für Ihre Countdown verwenden und geben Sie Ihre gewünschte Countdownzeit. Sein Sie sicher, dass Sie die Stunden, Minuten und Sekunden eingeben, auch wenn die Stunden und Minuten NULL sind. "02:30" ist zwei Stunden und dreißig Minuten; "0:2:30" ist zwei Minuten und dreißig Sekunden.

7 Klicken Sie auf die Registerkarte "Entwicklertools" am oberen Rand des Bildschirms, und klicken Sie auf die Schaltfläche "Makros" auf der linken Seite der Multifunktionsleiste. Wählen Sie aus "Countup" aus der Liste und klicken Sie auf "Ausführen". Der Countdown wird gestartet, und es wird fortgesetzt, bis es auf NULL, wird, wenn Sie sehen werden, eine Nachricht im Feld erklären, dass der Countdown beendet ist.

Tipps & Warnungen

• Wollen Sie den numerischen Countdown größer zu machen, können Sie eine Anzahl von Zellen, auswählen, solange Ihre angegebene Zelle in der linken oberen Ecke der Markierung befindet und wählen Sie die Registerkarte "Startseite" "Zusammenführen und Center". Ändern Sie die Schriftart (aus dem Heim zu), bis die Zahlen so groß sind wie Sie sein sollen.