AW: Zusatzfrage
22.11.2009 14:30:07
Uwe
Hallo Sibylle,
das steht auch in dem verlinkten Tutorial nebst den weiterführenden Links.
Aber noch mal kurz:
Zweidimensionale Arrays braucht man, wenn man mit Excelzellen arbeitet.
Eine Zelle wird durch 2 Dimensionen, nämlich Zeile und Spalte, adressiert.
In VBA dann z.B. für Zelle D2 Cells(2, 4). Du siehst, die Cells-Eigenschaft ist auch
ein zweidimensionales Array.
Ein kleines Beispiel.
Die Variable vnArray wird ohne Dimensionen als Variant deklariert.
Durch die Zuweisung der Werte eines Zellbereiches werden die Arraydimensionen automatisch angelegt.
Diese kannst Du im Lokalfenster auch sehen.
Sub ArrayTest()
Dim vnArray As Variant
Dim i As Long
Dim rngBereich As Range
Set rngBereich = ActiveSheet.Range("A1:A5")
vnArray = rngBereich.Value
Stop 'Code anhalten, weiter mit Taste F5
rngBereich.Offset(0, 3).Value = vnArray
Stop 'Code anhalten, weiter mit Taste F5
For i = 1 To UBound(vnArray)
vnArray(i, 1) = "vnArray(" & i & ", 1)"
Next i
Stop 'Code anhalten, weiter mit Taste F5
rngBereich.Value = vnArray
End Sub
Gruß Uwe