Hallo A.
Mit einer Schleife einlesen!
und
ReDim arrX(32) sind übrigens 33 Felder!
(0 to 31) = 32 Felder
(32) = 33 Felder
(31) = 32 Felder
(1 to 32) = 32 Felder
Offtopic
Vielleicht mal nützlich!
Grundeinstellung = Es ist immer die letzte Dimension die mit Redim Preserve nutzbar ist
So kannst du bei einem 2 dimensionalen Array die erste Dimension mit redim preserve nutzen!
+1 in der Function,vergrößert die dimension um 1
-1 in der Function,verkleinert die dimension um 1
Function ArrayRedim(Darr As Variant) As Variant
Darr = Application.WorksheetFunction.Transpose(Darr)
ReDim Preserve Darr(LBound(Darr) To UBound(Darr) + 1)
ArrayRedim = Application.WorksheetFunction.Transpose(Darr)
End Function
Gruß Nighty