Hallo,
vielleicht könnt ihr mir helfen.
Ich muß in Excel in der Spalte "D", eine Ganzzahl in ein Zeitformat umwandeln. Es handelt sich um etwa 1.000 - 1.500 Zeilen.
Beispiel: 102251 ergibt 10:22:51; 83522 ergibt 08:35:22 (hh:mm:ss).
Mit folgender Funktion kann ich die in Excel umwandeln.
Public Function GZ_Zeit(MerkDat As String) As Date
MerkDat = Format(MerkDat, "000000") 'macht die Zahl 6-stellig
GZ_Zeit = TimeValue(Left$(MerkDat, 2) & ":" & Mid$(MerkDat, 3, 2) & ":" & Right$(MerkDat, 2))
End Function
Wie sieht nun die VBA Prozedur aus, die die Ganzzahl Zeile für Zeile umwandelt?
Danke schon mal im voraus für eure Unterstüützung.
Grüße hjs
|