Hej

Jag behöver forumhjälp gällande VBA och Excel gällande ReDim mm

Jag har försökt förstå varför inte första men andra scriptet fungerar. Kan man inte öka dimensionerna i en dynamisk Array?

---Första---
Sub UsingRedimPreserve1()

Dim arr() As String

ReDim arr(0 To 2, 0 To 3)
arr(0, 1) = "Apple"
arr(1, 1) = "Orange"
arr(2, 1) = "Pear"

ReDim Preserve arr(0 To 5, 0 To 3)
arr(4, 2) = "Test"
Cells(4, 1) = arr(4, 2) 'test

End Sub

---Andra---
Sub UsingRedimPreserve2()

Dim arr() As String

ReDim arr(0 To 2)
arr(0) = "Apple"
arr(1) = "Orange"
arr(2) = "Pear"

ReDim Preserve arr(0 To 5)
arr(4) = "Test"
Cells(4, 1) = arr(4) 'test

End Sub

Stort tack!

// Daniel