In VBA sollten Werte erst konvertiert werden, nachdem geprüft wurde, ob sie zum erwarteten Datentyp passen. IsNumeric und IsDate können eine Vorprüfung liefern; sie garantieren aber nicht, dass eine Eingabe fachlich gültig oder in allen Regionen gleich interpretiert wird.

Sub WertePrüfen()
    Dim eingabe As Variant
    Dim zahl As Double
    Dim datum As Date

    eingabe = ThisWorkbook.Worksheets("Tabelle1").Range("B1").Value


    If IsNumeric(eingabe) Then
        zahl = CDbl(eingabe)
        ThisWorkbook.Worksheets("Tabelle1").Range("C1").Value = zahl
    ElseIf IsDate(eingabe) Then
        datum = CDate(eingabe)
        ThisWorkbook.Worksheets("Tabelle1").Range("C1").Value = datum
    Else
        MsgBox "Der Wert ist weder als Zahl noch als Datum erkennbar."
    End If
End Sub

Texte wie 03/04/2026 können je nach Ländereinstellung unterschiedlich verstanden werden. Für importierte Daten sind ein vereinbartes ISO-Datumsformat und explizite Dezimaltrennzeichen robuster. Fehlerbehandlung ist erforderlich, wenn Werte unerwartet oder leer sein können.

Speichern Sie Zahlen und Datumswerte als passende Datentypen; ein Zahlenformat in Excel ändert nur die Anzeige, nicht den zugrunde liegenden Wert.

Quellen und Prüfstand

Inhaltlich überarbeitet am 2026-10-13. Lokalisierte Formate und Typprüfung berücksichtigt.