das geht aber auch nicht:

Dim Sek As String * 2
Dim Sekunden As Single

Sek = Fusing(sekunden , "##")