Arrays in Variant-Variablen speichern

Variablen des Typs Variant können alle beliebigen Standarddatentypen ersetzen. 

Seit Access 7.0 ist es sogar möglich, ein Array innerhalb einer Variant-Variablen zu speichern. 

Um mehrere einzelne Ausdrücke einer Variant-Variablen in Form eines Arrays zuzuweisen, verwenden Sie einfach die Array-Funktion. 

Der Array-Funktion können beliebig viele Parameter unterschiedlichen Datentyps übergeben werden. Das Ergebnis ist ein sogenanntes Variant-Array, das einer Variant-Variablen zugewiesen werden kann.

Das folgende Beispiel definiert ein solches Variant-Array mit insgesamt 5 Elementen: 

Sub VariantTest() 

    Dim VarArray As Variant 
    Dim Element As Variant 

    VarArray = Array(1, "Text", #1/30/01#, 1.6, 1000000)
    
    For Each Element In VarArray
        Debug.Print Element 
    Next Element

End Sub 

Die einzelnen Elemente werden mittels einer For Each-Schleife im Testfenster ausgegeben. Als Alternativ kann auch eine herkömmliche For-Next-Schleife zum Einsatz kommen: 

Sub VariantTest2() 

    Dim VarArray As Variant 
    Dim i As Integer 

    VarArray = Array(1, "Text", #1/30/01#, 1.6, 1000000) 
    For i = LBound(VarArray) To UBound(VarArray)
        Debug.Print VarArray(i) 
    Next i 

End Sub 

Der große Vorteil von Variant-Arrays gegenüber normalen Arrays besteht darin, dass Sie Elemente mit unterschiedlichen Datentyypen aufnehmen können. Außerdem ist keine Pflege der Array-Grenzen beim Hinzufügen oder Löschen von Elementen erforderlich.