Hi,

Can someone please help me rework the following macro. I am trying to insert text into the middle of a document. I need the macro to find the first open cell in column D, key in "Deposit Required" and carry that text only as far down as there are filled cells in column C. I know the problem lies in the last line of the code, but I'm not sure how to fix it.

Range("D2").Rows.End(xlDown).Offset(1, 0).Select
ActiveCell.FormulaR1C1 = "Deposit Required"
ActiveCell.Copy
Range("D2").Rows.End(xlDown).Offset(1, 0).Select
Range("ActiveCell:D" & Cells(Rows.Count, "C").End(xlUp).Row).Paste


Thanks!
canadian_chickie