Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Vereinfachte Zeiteingabe

Gruppe

Eingabe

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