There no magic way to multiply an array. Just do it an element at a time:

Sub a()
Dim Arr(1 To 2)
Dim Counter As Integer
Arr(1) = 1
Arr(2) = 2
For Counter = LBound(Arr) To UBound(Arr)
Arr(Counter) = Arr(Counter) * 2
Next
MsgBox Arr(1) & " " & Arr(2)
End Sub


--
Jim Rech
Excel MVP