Wie verwende ich die VarType-Funktion in VBA?

In VBA (Visual Basic for Applications) wird die `VarType`-Funktion verwendet, um den Datentyp einer Variablen zu bestimmen. Sie gibt einen ganzzahligen Wert zurück, der dem Datentyp der angegebenen Variablen entspricht. Diese Funktion ist nützlich, wenn Sie den Typ von Variablen überprüfen müssen, insbesondere in Fällen, in denen der Datentyp variabel oder unbekannt ist.

Hier ist die Syntax für die Verwendung von `VarType`:

VarType(varname)

`varname` ist der Name der Variablen, deren Typ Sie ermitteln möchten.

Die `VarType`-Funktion gibt eine der vordefinierten Konstanten zurück, die den Datentypen entsprechen. Hier sind einige der häufigsten Rückgabewerte:

`0` für `Empty` (nicht initialisierte Variable)
`1` für `Null`
`2` für `Integer`
`3` für `Long`
`4` für `Single`
`5` für `Double`
`6` für `Currency`
`7` für `Date`
`8` für `String`
`9` für `Object`
`11` für `Boolean`
`12` für `Variant` (nur wenn in einem Array verwendet)
`13` für `DataObject`
`17` für `Byte`
`36` für `User-defined type`
`8000 + n` für `Array` von Typ `n`, wobei `n` der Basistyp ist (z. B. gibt `8204` ein Array von Typ `Long` an).

Hier ist ein einfaches Beispiel, wie Sie `VarType` in einem VBA-Makro verwenden können:

Sub TestVarType()
    Dim intValue As Integer
    Dim strValue As String
    Dim dateValue As Date
    Dim objValue As Object

    intValue = 42
    strValue = "Hallo"
    dateValue = Now
    Set objValue = CreateObject("Excel.Application")

    Debug.Print "intValue Typ: " & VarType(intValue)   ' Gibt 2 zurück
    Debug.Print "strValue Typ: " & VarType(strValue)   ' Gibt 8 zurück
    Debug.Print "dateValue Typ: " & VarType(dateValue) ' Gibt 7 zurück
    Debug.Print "objValue Typ: " & VarType(objValue)   ' Gibt 9 zurück
End Sub

In diesem Beispiel wird die `VarType`-Funktion verwendet, um den Typ mehrerer Variablen zu bestimmen, und das Ergebnis wird im Direktfenster von VBA ausgegeben. Dies ist eine nützliche Technik, um den Typ der Daten zu überprüfen, mit denen Sie arbeiten, insbesondere in dynamischen oder komplexen VBA-Prozeduren.

facebooklinkedin