Frage von decentr, 19

Uhrzeit Eingabe bei Excel?

Hallo Excel experten...

Ich will ständig Uhrzeit bei Excel Tabellen eintippen, wenn ich 14:30 schreiben will;

tippe ich 1 und 4 und : und 3 und 0

klar

gibt es irgendeiner Triptiks oder Format, das 14:30 ohne dies : eintippen ausgespuckt wird???

Expertenantwort
von Oubyi, Community-Experte für Excel, 19

Ich kenne da nur einen TRICK, der das Eingeben des ":" nur erleichtert, nicht erspart:
Datei/ Optionen/ Dokumentprüfung/ Autokorrektur-Optionen/
Autokorrektur-Optionen:
Ersetzen: ",," (Zwei Kommas)
Durch: ":"

OK.
Jeweils ohne die " " eingeben.
Jetzt kannst Du 14:30 eingeben als
14,,30
Also ohne den Ziffernblock verlassen zu müssen.
Ich finde das sehr einfach und praktisch.

P.S.: Und bis jetzt ist mir auch noch keine Situation untergekommen, in der ich wirklich einmal zwei Kommas nacheinander benötigt habe.


Kommentar von decentr ,

Super

funktioniert, hätte man Möglichkeit direkt 1430 tippen, kommt dann 14:30 heraus wäre dann ideal ..

Kommentar von Oubyi ,

Da das nur Sinn macht, wenn es in der gleichen Zelle sofort umgewandelt wird, funktioniert das nur über ein Ereignismakro per VBA. Allerdings müsste man das dann auf einen bestimmten Bereich eingrenzen, sonst kannst Du keine normalen drei- oder vierstelligen Zahlen mehr eingeben.
Für den Bereich C1:C100 sollte es so klappen
[WICHTIG: Dieser Bereich muss VORHER als TEXT formatiert werden]:

Rechtsklick auf den Tabellenreiter (unten, da wo z.B. Tabelle1 steht) und dann auf "Code anzeigen...".
In das große Fenster des VBA-Editors, der sich dann öffnet kopierst Du folgenden Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C1:C100")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
On Error GoTo ErrorHandler
Application.EnableEvents = False
If Len(Target) = 4 Then
Target.NumberFormat = ("hh:mm")
Target.Value = Left(Target, 2) & ":" & Right(Target, 2)
ElseIf Len(Target) = 3 Then
Target.NumberFormat = ("hh:mm")
Target.Value = Left(Target, 1) & ":" & Right(Target, 2)
End If
ErrorHandler:
Application.EnableEvents = True
End If
End Sub


Die Datei musst Du danach aber als .xlsm speichern, und Makros zulassen.

Teste auf jeden Fall mal ausführlich.
Eine erweiterte Fehlerbehandlung wäre auch noch möglich.


Das Makro musst Du aber überall einfügen, wo Du es brauchst, wohingegen der ,,-Trick automatisch überall klappt.

Expertenantwort
von Iamiam, Community-Experte für Excel, 9

"Ich will ständig Uhrzeit bei Excel Tabellen eintippen"

wenn Du immer die Jetzt-Zeit haben willst, gibts auch noch die Shortcuts:

Strg + : für die Zeit Jetzt() und Strg + . für das heutige Datum. Da werden die Zellen auch gleich entsprechend formatiert, allerdings das Datum im langen JJJJ-Format.

Kannst auch in der gleichen Zelle nacheinander Strg + : + leer + Strg + . eingeben, dann hast Du heute()+leer+Jetzt(). Geht auch mitten in einem Fließtext.

Aber Oubyis Trick ist auch gut und vor allem universell für jede Zeit, man muss nur drandenken, beim Neuaufsetzen von xl oder gar Windows die Bendef. Wörterbücher zu retten -oder sie neu schreiben.

Kommentar von Iamiam ,

Korrektur: für heute() +leer + Jetzt() natürlich umgekehrt:

nacheinander Strg + . + leer + Strg +

Keine passende Antwort gefunden?

Fragen Sie die Community

Weitere Fragen mit Antworten