Thema: Rechnen mit Zehntausendstel-Sekunden

Home

Gruppe

DatumZeit

Problem

Es soll mit Werten im Zehntausendstelsekundenbereich gerechnet werden.

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.

StandardModule: basMain

Function SpecTime(sTxt As String)
   Const DIV As Long = 86400
   Dim dValue As Double
   dValue = CInt(Right(sTxt, 4)) / 1000 / DIV
   dValue = dValue + CInt(Mid(sTxt, 4, 2)) / (DIV / 60)
   dValue = dValue + CInt(Left(sTxt, 2)) / (DIV / 60 / 60)
   SpecTime = dValue
End Function

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)