Ja moin, ich hab direkt mehrere Fragen zu Verständnis.
Ausgangslage:
ich möchte einen 2 Dimensionalen Array mit Werten aus einer Intelligenten Tabelle befüllen. Hierzu möchte ich zuerst die Daten aus der Tabelle in ein Range Objekt speichern und dieses anschließend im Aray speichern. Der Array soll eigentlich ein String Array werden, allerdings als solcher deklariert bekomm ich beim ReDim eine Fehlermeldung :(
Dim arr As String
Dim rng As Range
Dim zeile As Integer
Dim spalte As Integer
Set rng = Tabelle2.ListObjects("Mitarbeiter").DataBodyRange
ReDim arr(1 To rng.Rows.Count, 1 To rng.Columns.Count) <<<<<<<<<<< Fehlermeldung "Erwartet: Datenfeld"
arr = rng.Value
|