BJORN

In my macro I did have the space between the ) and the .Select but must have had something else out of order because I also was able to make it work after I posted. I again did not think the formula all the way thru because when I saw my result I realized I needed the two new columns to have the same SUMIF >0 critera that you help me with to be included in the result in t9. I entered the formula using the +Sumif and it only would work on the N column. I could not get it to work for the O column.Sorry for the confusion. Here the formula I tried to enter.

Range("t9").Select
ActiveCell.FormulaR1C1"=SUMIF(R[1]C[-13]:R[36]C[-13],"">0"",R[1]C[-14]:R[36]C[-14])+SUMIF(R[1]C[-13]:R[36]C[-13],"">0"",R[1]C[-6]:R[36]C[-6])"+SUMIF(R[1]C[-5]:R[36]C[-5])"

Can you run the macro to see if you can get it to work?

Thanks again
Todd