zeitformat in dezimalformat und umgekehrt
02.06.2007 21:07:00
tom
hallo,
habe probleme bei der umwandlung per vba von zeitformaten in dezimalformate.
ich wäre sehr dankbar für nen kleinen tip.
beispiel:
beginn und xtime sind als date formatiert
"sub zeit
a = "5:30"
Dim beginn As Date
beginn = Format(a, "hh:mm")
x = "06:00"
Dim xtime As Date
xtime = Format(x, "hh:mm")
If beginn < xtime Then
plus = Format(xtime - beginn, "hh:mm")
MsgBox plus
End If"
das ergebnis "plus" möchte ich nun per vba in eine dezimalzahl und
nach verschiedenen berechnungen wieder in das zeitformat umwandeln.
vielen dank schon mal - tom