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.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project