Thread: Adding arrays
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Dan[_30_] Dan[_30_] is offline
external usenet poster
 
Posts: 1
Default Adding arrays

I have 2 arrays that I have created in a macro. These arrays contain integer values and are 19x3 in size. The code to create the arrays is:

Workbooks(ResultsWB).Sheets("Daily Results - # Orders").Activate
Range("B5").Select
For j = 0 To 3
For i = 0 To 19
DailyArray(i, j) = ActiveCell.Offset(i, j).Value
Next i
Next j
Workbooks(CumWB).Sheets("Cum Order Data").Activate
Range("B5").Select

For i = 0 To 3
For j = 0 To 19
PrevCumArray(i, j) = ActiveCell.Offset(i, j).Value
Next j

The arrays are created correctly.

What I want to do, and can't seem to figure out the code to do it, is add the arrays together to create a third array (add the corresponding elements of each array). I am trying to do this in code using the array as a variable. If I want to create the third array as the values in a block of cells on a work sheet, using the "FormulaArray = " works,
With Selection
.FormulaArray = "=RC[-5]:R[19]C[-2]+'Cum Order Data'!R[-2]C[-5]:R[17]C[-2]"

but I then have to copy the results and paste them into the worksheet in a new place. I cannot create the array on the worksheet in its final location because I will be over-writing one of the arrays used in the formula.

Thanks in advance for the help