Eingabe Uhrzeit ohne Doppelpunkt
29.01.2004 11:36:21
Silvie
Hat jemand eine Ahnung wie ich in einer bestimmten Spalte z.b. A1:A250
ein Datum eingeben kann, ohne immer den blöden Doppelpunkt setzen zu müssen?
Es soll anstatt der Eingabe von 16:30 nur die Zahl 1630 eingegeben werden und die Zelle soll dann automatisch in das Zeitformat hh:mm umgewandelt werden.
Hab in der Recherche nur unten stehendes Makro gefunden, aber da muß man erst ein Button drücken und es wird immer nur die aktivierte Zelle geändert.
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
Wäre ne riesen Erleichterung wenn das ginge...
Gruß
silvie