Datediff nur hh:mm.....aber vorne keine Null?
05.07.2017 19:12:47
STeve
Habe schnelle Frage:
Wieso kommt bei der ua. Zeitdifferenzberechnung in der MsgBox:
011:59 und nicht 11:59 (so wie ich es haben will)
heraus.
Wo kommt die null vorne her.
Danke für eure Antwort/Lösung.
lg STeve
Sub testDiff()
Dim datStart As Date
Dim datEnd As Date
datStart = CDate("05.07.2017 04:00")
datEnd = CDate("05.07.2017 15:59")
MsgBox Int(CDbl(datEnd) - CDbl(datStart)) & Format(datEnd - datStart, "hh:mm")
End Sub
Anzeige