Code Snippet "VBA allgemein"

In VBA Datentyp überprüfen

Sub procDatentypAnzeigen(ByVal varEingabe)
  If IsNumeric(varEingabe) Then
    MsgBox ("Zahl")
  ElseIf IsDate(varEingabe) Then
    MsgBox ("Datum")
  ElseIf IsArray(varEingabe) Then
    MsgBox ("Array")
  Else
    MsgBox (TypeName(varEingabe))
  End If
End Sub