Multiplying Arrays

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