You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
Summing array element per column
- Thread starter nepai
- Start date
Thanks for the reply. That one works!
I'm trying to read the code I understand it a little.
If I put the data starting at row 2, I just I have to changed the r to start at 2. Same goes with the column.
But what if I only want to abs(A+C) or if I add column D, that is abs(A+B+D).
This is the logic that I'm trying to do actually.
I'm trying to read the code I understand it a little.
If I put the data starting at row 2, I just I have to changed the r to start at 2. Same goes with the column.
But what if I only want to abs(A+C) or if I add column D, that is abs(A+B+D).
This is the logic that I'm trying to do actually.
if your data starts at row 2, change the line For r = 1 to 3 to For r = 2 to 4 which I think you figured that out.
if you only want to add column A and C, you need to add an If condition.
This means if the Column number is not equals to 2 (B), then do the math.
and because this code is actually telling the computer to add/increase c each time it loops, starting from 1, and up till 3, after the third loop, c is increased to 4. That makes the condition of 1 to 3 fails, and then stop looping, however the variable c is still holding the value 4.
And in the line after that, Cells(r, c) = Total is actually printing the Total in column D, because c equals 4.
if you only want to add column A and C, you need to add an If condition.
Code:
If c <> 2 Then [COLOR=#333333]Total = Total + Abs(Cells(r, c).Value)[/COLOR]This means if the Column number is not equals to 2 (B), then do the math.
Code:
For c = 1 To 3
Total = Total + Abs(Cells(r, c).Value)
NextAnd in the line after that, Cells(r, c) = Total is actually printing the Total in column D, because c equals 4.
Got it!
To skip column 2 & 3, I just add "And" in the condition:
And to place the result in a selected column I just add a number in Cells(r, c), say Cells(r,c+1). This will move the result one column to the right.
I'm learning! Thanks millz!
Now I'm gonna figure out how to use Range instead of Cells.
To skip column 2 & 3, I just add "And" in the condition:
Code:
If c <> 2 And c <> 3I'm learning! Thanks millz!
Now I'm gonna figure out how to use Range instead of Cells.