Multiplying Arrays

**berabus** · 01-31-2010, 05:12 AM

Hi

anyone know the best way to multiply multiple arrays?

I have 3 1D arrays W(), Wpos() & Wflag()

i want to multiply each value in the array by the corresponding value in the other arrays

any advice please?

B

**teylyn** · 01-31-2010, 05:15 AM

maybe use the worksheet function SUMPRODUCT(). It is designed to do just what you're describing.

**berabus** · 01-31-2010, 05:25 AM

Originally Posted by teylyn

maybe use the worksheet function SUMPRODUCT(). It is designed to do just what you're describing.

Thanks Teylyn, tired this

Sub Arraymultiply()

Dim array1(), array2(), array3() As Integer
Dim i As Integer

    For i = 1 To 4
        array1(i) = Cells(i, 1)
        array2(1) = Cells(i, 2)
    
    array3(i) = WorksheetFunction.SumProduct(array1(i))(array2(i))
    Cells(i, 3) = array3(i)
    
    Next i
    
End Sub

but no avail?

What do you think

**zbor** · 01-31-2010, 05:17 AM

maybe would be usefull to upload example file and explain problem.

**teylyn** · 01-31-2010, 05:52 AM

This

array3(i) = WorksheetFunction.SumProduct(array1(i))(array2(i))

is missing several commas and a few brackets. Check your syntax.

**broro183** · 01-31-2010, 08:50 AM

hi Berabus,

Welcome to the Forum

I may be misunderstanding your question (or example) but... is there any particular reason why you are trying to do the multiplication in code rather than directly in the worksheet?
Doing it directly in the worksheet is likely to be much quicker than looping cell by cell, especially if your real data set is large.
From the example above, it appears that you could type