Zeitangabe in hh:mm:ss darstellen

[Kuwer]

Hallo,

dann aber eher so:

Code:

Function F_Kuwer(c00)
   Dim sn As String
   sn = Replace(c00.Value, "h", "*3600+")
   sn = Replace(sn, "m", "*60+")
   sn = Replace(sn, "s", "")
   F_Kuwer = Evaluate(sn) / 86400
End Function

Gruß Uwe

[snb]

Du hast mein UDF nicht getestet ?
Lass VBA für dich arbeiten !

Und was in Spanisch ? oder NL ? : da gibt's kein 'h".