I want to lose Array3 as a variable and make x = to the #
of cells in Array1 as long as Array1 and Array2 have the
same number of cells. Also I am only using a single
column for Array1 and Array2. This is like sumproduct
function in excel only different.

Function Deconvoloution(Array1 As Range, Array2 As Range,
Array3 As Integer)

Dim x As Integer
Dim y As Integer
Dim Final
Final = 0
x = Array3
y = 1

Do Until x = 0
Final = Final + (Array1(y) * Array2(x))
x = x - 1
y = y + 1
Loop

Deconvoloution = Final
End Function