HERBERS Excel-Forum - das Archiv
Problem mit Uhrzeitberechnung in TextBoxen
Frank

Einen wunderschönen Spätabend euch Allen!!!
Mittels folgendem Code lasse ich mir die Stunden bgerechnen, das ganze in einer UF!
Private Sub ComboBox4_Change()
Me.ComboBox4 = Format(ComboBox4, "hh:mm")
TextBox6.Value = ComboBox4.Text
With frmEingabe
If TextBox5 < TextBox6 Then
TextBox7.Value = Format(CDate(TextBox6) - CDate(TextBox5), "hh:mm")
End If
If TextBox5 > TextBox6 Then
TextBox7.Value = Format(CDate(TextBox5) - CDate(TextBox6), "hh:mm")
End If
End With
If TextBox5 = TextBox6 Then
TextBox7 = "00:00"
End If
TextBox18.Value = CDate(TextBox7.Value) * 24
TextBox18.Value = Format(TextBox18, "0.00")
End Sub
Nun möchte ich aber gern, dass der Code auch funzt wenn ich in der ComboBox4 24:00 auswähle!!!
Es kommt immer die Fehlermeldung - "Typen unverträglich".
Ich habe auch schon die Formatierung geändert gehabt: "[hh]:mm". Hat auch nichts gebracht!
Was muss ich tun!!!!
Danke im Vorraus!
Herzlichst, Frank H.

AW: Problem mit Uhrzeitberechnung in TextBoxen
Gerd

Hallo Frank,
vlt. akzeptieren, dass dieser Zeitpunkt in Excel 00:00 vom nächsten Tag ist u. mit 23:59 aufhören?
Gruß Gerd
AW: Problem mit Uhrzeitberechnung in TextBoxen
Frank

Hallo Gerd!!!
Schade, aber trotzdem Danke!
Gruß Frank H.
AW: Problem mit Uhrzeitberechnung in TextBoxen
Thomas

mach doch beim afterupdate der Checkbox erst ne Abfrage, ob die Stundenzahl größer als 23 is und wandle sie danach in eine normale Stundzahl um
Bisserl aufwendig und umständlich, aber besser als nix
Sprich, aus 24:00 23.11.09 mach 00:00 24.11.09
oder gibs einfach als String "24:00", aber nicht mehr als Zahl aus
Thomas