Zweidimensionales Array einlesen?
Hallo Ich möchte eine Tabelle mit 2 Spalten per Array in Excel VBA per Array einlesen lassen. Mein Programmcode sieht bisher so aus:
Sub aaaaa()
Dim bbbb(1 To 8, 1 To 2)
Dim i As Integer
For i = 1 To 8
bbbb(i, 1) = Worksheets("cccc").Range("i1").Value
bbbb(i, 2) = Worksheets("cccc").Range("i2").Value
Next i
End Sub
Leider funktioniert das Ganze nicht. Hat jemand eine Idee woran es liegen könnte?
Danke!
3 Antworten
![](https://images.gutefrage.net/media/user/IchMalWiederXY/1526297634563_nmmslarge__8_3_247_247_26a3615ed87a22b0c5c78d0564a9f676.jpg?v=1526297635000)
Kleiner Syntaxfehler:
For i = 1 To 8
bbbb(i, 1) = Worksheets("cccc").Cells(i,1).Value
bbbb(i, 2) = Worksheets("cccc").Cells(i,2).Value
Next i
ODER:
For i = 1 To 8
bbbb(i, 1) = Worksheets("cccc").Range("A" & i).Value
bbbb(i, 2) = Worksheets("cccc").Range("B" & i).Value
Next i
![](https://images.gutefrage.net/media/user/iqKleinerDrache/1569246496760_nmmslarge__3_0_160_160_b62c7a52995284adf52d0d38e9cb1bc5.png?v=1569246497000)
was soll denn i1 und i2 sein. Das muss ja genau eine Zelle sein und kein Range mit mehr Zellen wie es vermuten lässt-
![](https://images.gutefrage.net/media/default/user/8_nmmslarge.png?v=1551279448000)
i1/ i2 sollen die Zellen sein, die nach und nach per Schleife eingelesen werden sollen.
also A2/ B2; A3/ B3 usw.
![](https://images.gutefrage.net/media/user/iqKleinerDrache/1569246496760_nmmslarge__3_0_160_160_b62c7a52995284adf52d0d38e9cb1bc5.png?v=1569246497000)
aber die schleife sagt nur i = 1 to 8. i1 und i2 sind in Anführungszeichen und das heisst es sind irgendwelche Namen wie Hans und Egon.
![](https://images.gutefrage.net/media/user/RakonDark/1552185525294_nmmslarge__0_0_160_160_7f828fad18ee7edb96b8daceedaeeadb.png?v=1552185525000)