Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Timer ablaufen lassen

Timer ablaufen lassen
14.06.2016 09:21:56
Nick
Hallo zusammen,
ich benötige eure Hilfe bei folgendem Problem.
Ich habe eine Summe in Minuten, die ich als Timer im Format hh:mm in einer InfoBox oder änlichem runterlaufen lassen möchte. Der Timer soll aber bei 00:00 nicht auf aufhören, sondern als negative Zeit oder in Rot weiter laufen.
MfG und vielen Dank im Voraus
nick

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Timer ablaufen lassen
14.06.2016 18:27:25
Michael
Hi Nick,
das Makro zählt zwar auch Sekunden mit, aber Du wirst es vielleicht selbst anpassen können, wenn Du mal das Grundgerüst hast.
Das Kernstück stammt aus dem Osterrätsel 2015 von Luc:-?, die Anpassung auf Deine Fragestellung findest Du in der Datei: https://www.herber.de/bbs/user/106234.xlsm
Schöne Grüße,
Michael

Anzeige
AW: Timer ablaufen lassen
15.06.2016 07:41:15
Nick
Hallo Michael,
das sieht schonmal sehr gut aus. Werde es sobald wie möglich ausprobieren.
Danke
Nick

AW: Timer ablaufen lassen
14.06.2016 18:46:04
Daniel
Hi
Für Excel ist eine Zeit immer eine Uhrzeit und nie ein Mengenbegriff.
dh es gibt für Excel keine negativen Zeiten und es kann diese auch nicht darstellen.
wenn du also einen negativen Zeitwert berechnet hast (das geht, nur anzeigen geht nicht)
dann musst du, um diesen Zeitwert anzeigen zu können so vorgehen:
1. Zeitwert Absolut machen (Funktion ABS())
2. das "-" oder die Rotfärbung separat hinzufügen (in Abhängigkeit von berechneten Wert)
gruß Daniel
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Timer in Excel ablaufen lassen


Schritt-für-Schritt-Anleitung

Um einen Excel Timer zu erstellen, der bis zur negativen Zeit weiterläuft, kannst du die folgenden Schritte ausführen:

  1. Öffne Excel und erstelle eine neue Datei oder öffne eine bestehende.

  2. Aktiviere die Entwicklertools: Gehe zu "Datei" > "Optionen" > "Menüband anpassen" und aktiviere das Häkchen bei "Entwicklertools".

  3. Füge ein Modul hinzu:

    • Klicke auf "Entwicklertools" > "Visual Basic".
    • Im VBA-Editor, klicke mit der rechten Maustaste auf "VBAProject" und wähle "Einfügen" > "Modul".
  4. Füge den folgenden Code ein:

    Dim TimerRunning As Boolean
    Dim TimerValue As Date
    
    Sub StartTimer()
       TimerValue = TimeValue("00:05:00") ' Setze die Startzeit (z.B. 5 Minuten)
       TimerRunning = True
       Application.OnTime Now + TimeValue("00:00:01"), "UpdateTimer"
    End Sub
    
    Sub UpdateTimer()
       If TimerRunning Then
           TimerValue = TimerValue - TimeValue("00:00:01")
           If TimerValue < 0 Then
               TimerValue = TimerValue * -1 ' Wandle negative Zeit in positive um
               Range("A1").Interior.Color = RGB(255, 0, 0) ' Rot färben
           End If
           Range("A1").Value = Format(TimerValue, "hh:mm:ss")
           Application.OnTime Now + TimeValue("00:00:01"), "UpdateTimer"
       End If
    End Sub
    
    Sub StopTimer()
       TimerRunning = False
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Füge einen Button hinzu, um den Timer zu starten und zu stoppen:

    • Klicke auf "Entwicklertools" > "Einfügen" > "Button (Formsteuerung)".
    • Zeichne den Button und weise die Makros StartTimer und StopTimer zu.
  7. Teste den Timer: Klicke auf den Button, um den Timer zu starten.


Häufige Fehler und Lösungen

  • Fehler: Der Timer stoppt nicht.

    • Lösung: Stelle sicher, dass das Makro UpdateTimer regelmäßig aufgerufen wird, indem du die OnTime-Methode korrekt einstellst.
  • Fehler: Negative Zeit wird nicht angezeigt.

    • Lösung: Excel kann keine negativen Zeiten darstellen. Nutze die Funktion ABS() im VBA-Skript, um die negative Zeit in eine positive Zahl umzuwandeln und ändere die Schriftfarbe entsprechend.

Alternative Methoden

Einige Benutzer haben alternative Ansätze ausprobiert, um einen Timer in Excel zu erstellen. Eine Möglichkeit ist die Verwendung von Excel-Formeln, um die Zeit zu berechnen, jedoch erfordert dies manuelles Eingreifen und ist weniger automatisiert als die Verwendung von VBA.

Ein einfacher Timer kann auch mit bedingter Formatierung erstellt werden, um die Zellenfarbe basierend auf dem Wert zu ändern, aber dies hat Einschränkungen.


Praktische Beispiele

Hier sind einige praktische Anwendungen eines Excel Timers:

  • Countdown für Meetings: Setze einen Timer für die verbleibende Zeit bis zu einem Meeting.
  • Kochzeit überwachen: Erstelle einen Timer, um die Kochzeit für verschiedene Rezepte zu verfolgen.
  • Sporttraining: Nutze den Timer, um Pausenzeiten während des Trainings zu steuern.

Tipps für Profis

  • Verwende die Application.Wait-Methode, um den Code weniger CPU-intensiv zu gestalten.
  • Experimentiere mit verschiedenen Zeitformaten, um den Timer an deine Bedürfnisse anzupassen.
  • Denke daran, Sicherheitseinstellungen in Excel zu überprüfen, damit Makros ausgeführt werden können.

FAQ: Häufige Fragen

1. Kann ich den Timer auch für andere Zeitformate verwenden?
Ja, du kannst die Startzeit im Code anpassen, um verschiedene Zeitformate zu verwenden.

2. Wie kann ich den Timer anhalten?
Du kannst den StopTimer-Button verwenden, um den Timer anzuhalten, wenn du den Timer nicht mehr benötigst.

3. Ist dieser Timer in allen Excel-Versionen verfügbar?
Ja, dieser Timer sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige