There were two minor typos in one statment

Range("N" & RowCount).Formula = _
"=sumif(C4:C" & Lastrow & ",C" & RowCount & _
",F4:F" & Lastrow & ")"


I had D: and replaced with just C.


Here are the other two forumulas

Range("O" & RowCount).Formula = _
"=sumif(C4:C" & Lastrow & ",C" & RowCount & _
",K4:K" & Lastrow & ")"

Range("P" & RowCount).Formula = _
"=Range("N" & RowCount) / Range("O" & RowCount)"


--
joel
------------------------------------------------------------------------
joel's Profile: 229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=175872

Microsoft Office Help