Thema: Zählen von Jahren, Monaten, Tagen, Stunden, Minuten, Sekunden

Home

Gruppe

DatumZeit

Problem

In einer Tabelle wird gezählt, wieviel Zeitabschnitte zum Ausgangspunkt vergangen sind bzw. zum Endpunkt noch zu erwarten sind. Abbruch der Routine mit der ESCAPE-Taste.

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.

StandardModule: basMain

Sub CountDown()
   On Error GoTo ERRORHANDLER
   Application.EnableCancelKey = xlErrorHandler
   Do
      Application.Wait Now + Range("B3").Value
      Application.Calculate
   Loop While Err = 0
ERRORHANDLER:
   MsgBox "Ablauf wurde unterbrochen!"
End Sub

Beiträge aus dem Excel-Forum zu den Themen DatumZeit und Zeit

Datum + Uhrzeit aus Textbox richtig in Zelle	Laufzeit ermitteln
Laufzeitfehler 438	Laufzeitfehler '13'
Akt. Datum und Uhrzeit am gedruckten Dokument	VBA: UF Laufzeitfehler
SVERWEIS mit wahr via Zeit hh:mm bzw. hh:mm:ss	4 gleiche Gruppen aus 40 Zeiten/Läufern
Wandlung Connectstring für Uhrzeit	Laufzeitfehler 1004: Anwendungs- oder objektorient
Laufzeitfehler 104 automatisches Starten von Makro	Blatt als pdf mit Datum Uhrzeit
XLTM wird von ca. 200 Pers. gleichzeitig geöffnet	Auswertung_Uhrzeiten_Schichtplan
Hilfe Laufzeitfehler wegen benutzerdef. Ansicht	gleichzeitiges Ausfüllen mehrerer Zellen
Pastespecial-Methode - Laufzeitfehler 1004	Fehler Formel Zeitberechnung
Zeiten (diff. in Monaten) berechnen	Zeiterfassung
mehrere TXT Datein gleichzeitig importieren	Zahlen in Form von Uhrzeit darstellen
Lange Laderzeit XLS Dokument	Format Datum / Uhrzeit
Zeitermittlung zwischen zwei Datumsfeldern	MSGBox Zeitraum filtern
Zeitnachweis erstellen	Zeitachse normieren
Datengröße evtl Makro Zeitberechnung	Laufzeitfehler beim sortieren
Code in mehreren Tabellen gleichzeitig ausführen	@ Tino (in Zeitraum Suchen)
In einem Zeitraum per VBA suchen	Zeitberechnung
Laufzeitfehler 9 bei Makroaufzeichnung	Uhrzeit automatisch eintragen
Laufzeitberechnungsformel	Extremwert eines Zeitraumes ermitteln
Funktion Dezimal -> Zeit/ Variablen-Deklaration	Zeitlich gesteuerte Abrufintervalle
Uhrzeit teilen und Ergebnis in Zahl ausgeben	Laufzeitfehler 1004 bei Selection.Offset
Laufzeitfehler 2147417878	Klassen/Objekte zur Laufzeit entladen
Dateneingabe mit Datum+Uhrzeit vervollständigen	VBA Zeitmessen
seltsame Zeitformate	Daten auslesen/Zeit unterschiedliche Länge
Zeitstrahl _ Diagramm	Uhrzeitangabe auswerten (Zeitspanne)