Last Row

[Vincent Thank You]

Hello,

The following code is not allowing me to integrate the "lastrow" formula and is creating 0's well past the data range.

On Error Resume Next
With ActiveSheet.Range("N2:N2" & Cells(Rows.Count, 2).End(xlUp).Row).SpecialCells(xlCellTypeVisible)
.Cells.FormulaR1C1 = "=RC[-2]"
.Cells.FillDown

When I do integrate it the way I see fit the formula doesn't preform properly. Thanks!

 

[Vincent Thank You]

Thank you kind sir. That's what I was looking for. Have a great day!