If the functions in the freely downloadable file at
http://home.pacbell.net/beban are available to your workbook:

=ScalarMult(myArray, k) to multiply each element of the array by the
scalar k. To divide, enter False as the 3rd argument.

Alan Beban

John wrote:
Hi all can any one help me with the following

Sub....

A1=Array(10)
A2=Array(10)
.................
Dim X3 Date
Dim X4 Date
Dim X5 Long

A1(9) = Range("B8:L8")
A2(9) = Range ("B9:L9")

X5=(X3-X4)*1440
...........
I need to be able to take the difference of arrays (A1-A2) divide with X5
and put into a range of cells.. I do not know how to multiply Arrays

for example Range("N9:W9")=(A1-A2)/X5 does not work.....

does anyone have a sample of how to multiply an array with a constant?

Thank you

John