VBA Matrix Operations Help Needed.

Is there a way for the array range to be dynamic … like Dim array(1 to N) Double N could be set differently in different parts of the code?

Is there a way for the array range to be dynamic … like Dim array(1 to N) Double where N could be set differently in different parts of the code?

Quote:

---

Originally Posted by Paul_Hossler

You Dim-ed Del1St and W1St as Variant, and plain variants don't take an Index (IZ)

I did not see where Z1St was Dim-ed at all

Code:

---

            Del1St(IZ) = Del1  'Type Mismatch
            W1St(IZ) = W1    'Type Mismatch
            Z1St(IZ) = Z1      'Type Mismatch


---

I'm guessing you wanted

Code:

---

          Dim  Del1St(1 to 20) As Double
          Dim  W11St(1 to 20) As Double
          Dim  Z1St(1 to 20) As Double

---

---

Paul ... please help me remember how to mark a topic “solved”

Above your first post, there's [Thread Tools] and an option is to mark [SOLVED]

Quote:

---

Originally Posted by dennygibson

Is there a way for the array range to be dynamic … like Dim array(1 to N) Double where N could be set differently in different parts of the code?

---

Yes

Look in Help for "ReDim" and "Redim Preserve"

However, I've found that most times it's not needed and can be designed around

Some sample code

Code:

---

Option Explicit

Sub Arrays()
    Dim A(1 To 2) As Long  '  fixed
    Dim B() As Long        '  ReDim-able
   
    A(1) = 100
    A(2) = 200
    MsgBox A(1) & " -- " & A(2)
   
    ReDim B(1 To 3)
    B(1) = 1000
    B(2) = 2000
    B(3) = 3000
    MsgBox B(1) & " -- " & B(2) & " -- " & B(3)
   
    ReDim Preserve B(1 To 4)
    B(4) = 4000
    MsgBox B(1) & " -- " & B(2) & " -- " & B(3) & " -- " & B(4)
   
    Erase A
    MsgBox A(1) & " -- " & A(2)
    A(1) = 10000
    A(2) = 20000
    MsgBox A(1) & " -- " & A(2)
End Sub

---

Paul ... thanks!