Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.09.2025 15:11:53
Probleme mit dem Autovervollständigen
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1636to1640
1636to1640
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Format hh:mm

Forumthread: Format hh:mm

Format hh:mm
01.08.2018 11:03:26
Berg
Hallo,
ich bitte um Hilfe bei der Formatierung von Werten.
Über eine Userform gebe ich für eine Stundenerfassung die monatliche Arbeitszeit in Form von z.B. 40:00 Stunden pro Monat ein.
Dabei prüfe ich direkt in der Textbox ob die Werte richtig eingeben werden über: 
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox3 = "" Then Exit Sub
If Not IsDate(Me.TextBox3) Then
MsgBox ("Eingabe ist nicht vom Type Time!")
TextBox3.BackColor = RGB(100, 100, 199)
Else
TextBox3.BackColor = RGB(255, 255, 255)
TextBox3 = Format(TextBox3, "hh:mm")
End If
End Sub
Ich glaube dass "isDate" hier falsch ist da ich nicht über die 24:00 hinaus komme. Gibt es hier irgendwas mit "Time" oder so?
Wenn ich die Daten dann in der Tabelle abspeicher, möchte ich dass der Eingabewert aus der Textbox auch im Format 40:00 in die Zelle geschrieben wird (weil die Stunden dann später summiert werden).
Dies hab ich wie folgt probiert aber damit komme ich auch nicht über 24:00 Stunden hinweg (Whs. das falsche Format)
Tabelle3.Cells(lZeile, 5).Value = CDate(TextBox3)
Tabelle3.Cells(lZeile, 5).NumberFormat = "hh:mm"
Weis hier jemand wie man das richtig macht?
Vorab allerbesten Dank für die Hilfe!
VG Berg
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Format hh:mm
01.08.2018 11:09:33
Hajo_Zi
Tabelle3.Cells(lZeile, 5).NumberFormat = "[hh]:mm"
da über 24 Stunden.
Isdate ist korrekt.

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
AW: Format hh:mm
01.08.2018 11:24:45
Luschi
Hallo Hajo,
schade, daß Dich Infos über dieses Thema in Excel-Büchern nicht die Bohne interessieren,
denn dann wüßtest Du:
Tabelle3.Cells(lZeile, 5).NumberFormat = "[h]:mm"
korrekt ist.
siehe: 'Excel programmieren' von Michael Kofler, Ralf Nebelo, Hanser Verlag, 2014, Seite 235.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Format hh:mm
01.08.2018 11:33:45
Berg
Okay, erstmal danke.
Und was muss ich in meiner Vorabprüfung (Code unten) ändern sodass er mehr als 24:00 Stunden zulässt?
Weil wenn ich schreibe:
TextBox3 = Format(TextBox3, "[hh]:mm") --> komme trotzdem nicht über 24:00 Stunden
TextBox3 = NumberFormat(TextBox3, "[hh]:mm") --> Fehler! 
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox3 = "" Then Exit Sub
If Not IsDate(Me.TextBox3) Then
MsgBox ("Eingabe ist nicht vom Type Time!")
TextBox3.BackColor = RGB(100, 100, 199)
Else
TextBox3.BackColor = RGB(255, 255, 255)
TextBox3 = Format(TextBox3, "hh:mm")
End If
End Sub

Anzeige
AW: Format hh:mm
01.08.2018 11:54:51
Hajo_Zi
schreibe es in die Zelle und lese .Text aus
Gruß Hajo
AW: Format hh:mm
01.08.2018 12:31:15
Berg
Hä? Was soll ich machen?
Ich will eigentlich nur dass in TextBox3 nichts ausser hh:mm eingetragen wird.
Das möchte ich abfangen. Und mit hh:mm will ich auch über 24:00 Stunden hinauskommen z.B. 103 Stunden.
Anzeige
AW: Format hh:mm
01.08.2018 13:25:46
Berg
Weis jemand wie das geht?
AW: Format hh:mm
01.08.2018 13:57:24
Rudi
Hallo,
eine Möglichkeit: 
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim tmp, bolNoTime As Boolean
If TextBox3 = "" Then Exit Sub
tmp = Split(TextBox3, ":")
If UBound(tmp) = 1 Then
bolNoTime = Val(tmp(1)) > 60
Else
bolNoTime = True
End If
If bolNoTime Then
MsgBox ("Eingabe ist keine Zeit!")
TextBox3.BackColor = RGB(100, 100, 199)
Cancel = True
Else
TextBox3.BackColor = RGB(255, 255, 255)
End If
End Sub

Gruß
Rudi
Anzeige
AW: Format hh:mm
01.08.2018 14:22:35
Berg
Hallo Rudi,
super vielen Dank für deinen Code. Kann man noch irgendwie ergänzen wenn man eingibt z.B: "1:" dass er dann "01:00" oder aus "2:2" dann "02:20" beim verlassen der Textbox draus macht.
AW: Format hh:mm
02.08.2018 14:48:07
Hajo_Zi
Ein Beitrag in offen reicht, wie schon mitgeteilt.
Gruß Hajo
Anzeige
;

Forumthreads zu verwandten Themen

Format(x, "[hh]:mm:ss") in TextBox
Christian

Hi Leute,
um die Differenz zwischen zwei Zeiten zu berechnen kann man in Zellen z.Bsp. mit: Cells(1, 1).NumberFormat = "[hh]:mm:ss"
ein Format vorgeben, das mehr als 24 Stunden anzeigt.
Ich steh grade etwas auf dem Schlauch... wie funktioniet das bei einer TextBox in einer Userform...
16.06.2010 14:52:34
Thread-ID: 1162232
5 Beiträge
zellen hh:mm formatieren !
Ernst

Hallo Exel Profis !
würde wieder mal eure Hilfe benötigen,
wenn ich Zellen mit Datumsformat hh:mm formatieren und anschliesend zb.1400 Enter drücke erscheint
00:00 anstatt 14:00.
gibts dafür eine Lösung !
lg.Ernst
25.08.2010 10:11:55
Thread-ID: 1174088
3 Beiträge
Anzeige
If Range("A1") = Format("hh:mm") Then
Olaf

Hallo...
in A1 wechselt die Darstellung der aktuellen Zeit "hh:mm")mit anderen textlichen Inhalten. Wenn A1 Format("hh:mm")hat, möchte ich einen Makro ausführen.
Ich hab es folgendermaßen versucht, aber es geht so nicht.
If Range("A1") = Format("hh:mm") Then
Makro1
End If
12.08.2013 21:29:52
Thread-ID: 1326608
7 Beiträge
Zelle formatieren in hh:mm:ss
henrik

Hi zusammen,
ich habe eine Zelle wo bspw. 180,46 drin steht. Der Wert steht für 180 Sekunden. Jetzt möchte ich diesen Wert formatieren und zwar in das Format:
hh:mm:ss
Wie mache ich das am Besten? Am liebsten wäre es mir über benutzerdefinierte Formatierung der Zelle. Geht das darüb...
06.10.2014 13:48:29
Thread-ID: 1385071
7 Beiträge
Zelle formatieren in hh:mm:ss
henrik

Hi zusammen,
ich habe eine Zelle wo bspw. 180,46 drin steht. Der Wert steht für 180 Sekunden. Jetzt möchte ich diesen Wert formatieren und zwar in das Format:
hh:mm:ss
Wie mache ich das am Besten? Am liebsten wäre es mir über benutzerdefinierte Formatierung der Zelle. Geht das darüb...
06.10.2014 15:14:45
Thread-ID: 1385095
2 Beiträge
Zelle formatieren in hh:mm:ss
henrik

Hi zusammen,
ich habe eine Zelle wo bspw. 180,46 drin steht. Der Wert steht für 180 Sekunden. Jetzt möchte ich diesen Wert formatieren und zwar in das Format:
hh:mm:ss
Wie mache ich das am Besten? Am liebsten wäre es mir über benutzerdefinierte Formatierung der Zelle. Geht das darüb...
06.10.2014 15:24:41
Thread-ID: 1385098
2 Beiträge
Zelle formatieren in hh:mm:ss
henrik

Hi zusammen,
ich habe eine Zelle wo bspw. 180,46 drin steht. Der Wert steht für 180 Sekunden. Jetzt möchte ich diesen Wert formatieren und zwar in das Format:
hh:mm:ss
Wie mache ich das am Besten? Am liebsten wäre es mir über benutzerdefinierte Formatierung der Zelle. Geht das darüb...
06.10.2014 15:32:40
Thread-ID: 1385102
4 Beiträge
Anzeige
Userform - Textbox Format hh:mm
Yvonne

Hallo,
ich benötige Eure Hilfe.
Auf meiner Userform ist bei 6 Textboxen folgendes Format hinterlegt:
Datenerfassung.Controls("TextBox" & Spalte(i)).Value = Tabelle2.Cells(Zeile, Spalte(i)) 'Spalten F-M - Start- und Endzeiten
Datenerfassung.Controls("TextBox" & Spalte(...
20.03.2015 13:21:02
Thread-ID: 1416185
5 Beiträge
Wie formatiere ich Range benutzerdefiniert hh:mm?
Thomas

Mit Range(x; y).Numberformat = "hh:mm" funktioniert es nicht und auch Range(x;y).Value = Format(Range(x;y).Value; "hh:mm") geht es in Excel 5.0 nicht?Was kann ich da tun? Danke im voraus
mfg Thomas
22.08.2002 10:48:57
Thread-ID: 151464
2 Beiträge
Text in Zelle, die mit Zeit hh:mm formatiert ist
Stephan

Hallo zusammen,
ich habe eine Tabelle zur Arbeitszeitberechnung.
Habe sie im Anhang angefügt.
https://www.herber.de/bbs/user/122799.xlsx
Klassisch: Von - Bis - Pause - Ist - Soll - Plus/Minus
Die Zellen sind bei Zeiteingabe ja automatisch als "hh:mm" formatiert.
Ich möch...
19.07.2018 20:39:43
Thread-ID: 1634989
6 Beiträge
Textbox: Format hh:mm bei Einlesen und Zurückgeben
Oliver

Hallo Excel Experten,
ich habe eine Multipage mit zwei Seiten. Auf der ersten Seite trage ich Informationen in TextBoxen ein um diese dann in eine Tabelle zu speichern. Hier lasse ich nur gültige Uhrzeiteingaben zu und das funktioniert auch klasse mit folgendem Code:
'Eingabebeschränkun...
24.09.2018 10:42:43
Thread-ID: 1647417
3 Beiträge
Summenbildung über hh:mm-Formate
D. P.
Hallo Ihr,

mein Problem besteht darin, daß ich Stunden und Minuten mit dem oben gezeigten Format (hh:mm) addieren will, aber wenn ich z. B. die Summe über 5 Felder mit jeweils 08:00 ziehe, kommt nur 16:00 anstelle von 40:00 raus.

Wer kann mir mehr zu diesem Thema sagen?

Mit f...
14.10.2003 17:19:17
Thread-ID: 323516
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Formatierung von Uhrzeiten in Excel: hh:mm und mehr

Schritt-für-Schritt-Anleitung

  1. Erstelle eine Userform: Füge eine TextBox hinzu, in der die Eingabe der Arbeitszeit erfolgt.

  2. VBA-Code für die Eingabekontrolle: Verwende den folgenden VBA-Code, um sicherzustellen, dass die Eingaben im Format hh:mm erfolgen:

    Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
   If TextBox3 = "" Then Exit Sub
   If Not IsDate(Me.TextBox3) Then
       MsgBox ("Eingabe ist nicht vom Type Time!")
       TextBox3.BackColor = RGB(100, 100, 199)
   Else
       TextBox3.BackColor = RGB(255, 255, 255)
       TextBox3 = Format(TextBox3, "[hh]:mm")
   End If
End Sub

  3. Speichere die Eingaben im richtigen Format: Um sicherzustellen, dass auch Werte über 24 Stunden gespeichert werden, setze das NumberFormat der Zelle auf [hh]:mm:

    Tabelle3.Cells(lZeile, 5).NumberFormat = "[hh]:mm"
Tabelle3.Cells(lZeile, 5).Value = TextBox3

Häufige Fehler und Lösungen

  • Problem: Eingaben über 24 Stunden werden nicht akzeptiert.

    • Lösung: Stelle sicher, dass du das NumberFormat auf [hh]:mm setzt, um Werte über 24:00 zu ermöglichen.

  • Problem: IsDate funktioniert nicht wie gewünscht.

    • Lösung: Verwende einen anderen Ansatz zur Validierung der Eingabe, beispielsweise mit Split:
    Dim tmp, bolNoTime As Boolean
tmp = Split(TextBox3, ":")
If UBound(tmp) = 1 Then
   bolNoTime = Val(tmp(1)) > 60
End If

Alternative Methoden

Anstelle der Verwendung von IsDate kannst du die TextBox-Eingaben direkt analysieren. Ein einfacher Ansatz wäre, die Eingaben mit Regex zu validieren oder die Eingabe in Stunden und Minuten zu splitten und dann zu formatieren.

Praktische Beispiele

  • Eingabe von 40:00 Stunden: Wenn der Benutzer 40:00 in die TextBox eingibt, wird dies korrekt als 40:00 in die Zelle geschrieben, wenn das NumberFormat wie oben beschrieben gesetzt ist.

  • Umwandlung von 1:2 in 01:02: 

    Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
   If TextBox3 Like "*:*" Then
       Dim parts As Variant
       parts = Split(TextBox3, ":")
       If UBound(parts) = 1 Then
           TextBox3 = Format(Val(parts(0)), "00") & ":" & Format(Val(parts(1)), "00")
       End If
   End If
End Sub

Tipps für Profis

  • Nutze [hh]:mm Formatierung in Excel, um die korrekte Darstellung von Arbeitszeiten zu gewährleisten, insbesondere wenn diese über 24 Stunden hinausgehen.
  • Halte die Eingaben in der TextBox einfach und klar, um Missverständnisse zu vermeiden. Ein Hinweistext kann hilfreich sein.
  • Überlege, zusätzliche Validierungen einzubauen, um sicherzustellen, dass nur gültige Zeitformate akzeptiert werden.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass die Eingabe nur im Format hh:mm erfolgt?
Du kannst die Eingabe mit einem VBA-Skript validieren, das prüft, ob die Eingabe dem erwarteten Format entspricht.

2. Was ist der Unterschied zwischen hh:mm und [hh]:mm?
hh:mm ist für normale Zeitangaben, während [hh]:mm es dir ermöglicht, Stunden über 24 darzustellen.

3. Wie kann ich die Eingabe in der TextBox automatisch formatieren?
Verwende den Exit-Event der TextBox, um die Eingabe beim Verlassen der Box zu formatieren, beispielsweise in hh:mm.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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