Gruss
M@x
sollen wir jetzt das besagte Makro suchen und wenn ja wo? Poste bitte den Code damit man Dir helfen kann.
Gruß
Peter
Sub InZeit
Dim rng As Range
Dim stxt As String
For each rng In Selection.Cells
stxt = rng.Value
rng.NumberFormat = "hh:mm"
rng.Value = TimeSerial(left(stxt, 2), Right(stxt, 2), 0)
Next rng
End Sub
Wenn ich das Format in "h:mm" aendere wird mir bei zb. 900 zwar 9:00 angezeigt aber dafuer nicht zb. 2200 in 22:00.Ich nehme an da muss if und then eingebaut werden.Oder??
Hary
da kann ich Peter nur zustimmen. Wo ist der Code.
Hier mal ein Code zur vereinfachten Zeiteingabe
Gruß Hajo
habe den Code etwas erweitert, versuch mal:
Gruß
Peter