ReDim Preserve - Laufzeitfehler 9
07.02.2004 15:57:20
Boris
bitte löst doch mal eben meinen Knoten im Hirn:
Warum gibt folgende Dummy-Prozedur beim zweiten Schleifendurchlauf nen Laufzeitfehler 9 - Index außerhalb des gültigen Bereiches? Bemeckert wird die ReDim-Zeile.
Es ist bewusst nur ein Dummycode - es geht mir also nur ums richtige Prinzip.
Sub test()
Dim myArray(), i As Integer
For i = 1 To 10
ReDim Preserve myArray(1 To i, 5)
myArray(i, 1) = i
myArray(i, 2) = i * 2
myArray(i, 3) = i * 3
myArray(i, 4) = i * 4
myArray(i, 5) = i * 5
Next i
End Sub
Danke vorab und
Boris