HERBERS Excel-Forum - die Beispiele

Thema: Vereinfachte Zeiteingabe

Home

Gruppe

DatumZeit

Problem

Ich habe in eine Spalte eine große Anzahl von Uhrzeiten einzugeben. Hierbei hemmt die Eingabe des Doppelpunktes bei z.B. "12:15" den Eingabefluß. Wie kann ich die Eingabe vereinfachen?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain

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

Beiträge aus dem Excel-Forum zu den Themen DatumZeit und Eingabe

VBA - Eingabefeld für gesamte Spalte Datenbank mit Eingabefenster
Excel VBA: 1x Eingabe für mehrere Filter in Pivot Nach erfolgter Eingabe Makro nicht ausführen wenn
In Userform Label bei Eingabe ändern Eingabemaske ändern, Daten übertragen
Zelleneingabe nur per Combobox erlauben Eingabe in gesamter Arbeitsmappe prüfen
Formatierung Dezimalzahlen bei Combobox-Eingaben Wenn X dann Ja, bei keiner Eingabe Nein
Textlänge bei Eingabe in Textbox begrenzen Zelleveränderung nach Eingabe
Kennworteingabe per Makro Dateneingabe mit Datum+Uhrzeit vervollständigen
Eingabemeldung auch für mehrere Zellen? Datumseingabe vereinfachen
Eingabefeld verliert Focus Eingabe bezogen auf eine eine Zelle
Eingabemastke großes Eingabefeld
Eingabe prüfen nach eingabe zweier zeichen automatisch zelle wech
Eingabe prüfen Eingabe von /
Eingabe erwzwingen? Alternative Eingaben über InputBox
UF Eingabe Monatstage abhängig von Texteingabe ermitteln
Wenn Eingaben im Bereich...dann Grafikobjekt nach Zelleingabe anpassen
Dateneingabe u. Arbeitsblatt kopieren datenbereich und manuelle eingaben in bezug setzen
Dateneingabe ohne Userform Eingabe von Nichts ("") schneidet Text ab
Button drücken während Zelleingabe Textboxeingabe prüfen
Eingabemaske DatumZeit subtrahieren ergibt falschen Monatswert
Eingabeformular InputBox - Eingabeformat abfangen
Zellen Sperren wenn Eingabe in übergeordnete Zeile Fenstereingabe(USerform) anwählen von Zellen
Eingabeformular Eingaben überprüfen / zur Eingabe "zwingen&qu
Eingabeprüfung Bei mehreren TextBoxen Eingabe prüfen
Textbox Eingabe prüfen Fenstereingabe von Daten
Nach dem Bestätigen der Eingabe in eine Zelle... gleichzeitige Eingabe in Bereiche