Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1252to1256
1252to1256
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Codeerweiterung gesucht

Forumthread: Codeerweiterung gesucht

Codeerweiterung gesucht
Frank
Hallo Zusammen!
Nutze folgenden Code:
If Len(TextBox13.Text) = 4 Then
TextBox13 = Format(Left(TextBox13, 2) & ":" & Right(TextBox13, 2), "hh:mm")
End If
Kann man diesen erweitern, so dass ich am Ende die Zeit im Format "hh:mm:ss" bekomme!!!
Danke!!!
Gruß Frank H.
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Codeerweiterung gesucht
05.03.2012 13:14:36
Rudi
Hallo,
so?
textbox13=format(timeserial(--left(textbox13,2),--right(textbox13,2),0),"hh:mm:ss")
Gruß
Rudi
AW: Codeerweiterung gesucht
05.03.2012 13:25:27
Frank
Hallo Rudi!
Danke für deine Antwort! Leider gibt es ein Problem:
Ich gebe bspw. 000345 ein, was dann 00:03:45 werden soll, wird es aber nicht! Es wird: 00:45:00.
Hast du eine Idee woran das liegen könnte?
Danke und Gruß, Frank H.!!!
Anzeige
AW: Codeerweiterung gesucht
05.03.2012 13:53:11
Rudi
Hallo,
textbox13=format(timeserial(--left(textbox13,2), --mid(textbox13,3,2), --right(textbox13,2)),"hh:mm:ss")
Gruß
Rudi
AW: Codeerweiterung gesucht
05.03.2012 16:08:26
Frank
Hallo Rudi!!!
So funzt es Super!!! Vielen herzlichen Dank und dir noch 'nen schönen Tag!!!
War kurz weg, deshalb erst jetzt der Dank!!!
Gruß Frank H.!!!
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige