Nigel,

ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Select
ActiveCell.Offset(2, -1) = "Line"
ActiveCell.Offset(2, 0) = "Ind"

HTH

"Nigel" wrote:

I am able to determine the last row in a spreadsheet and go to it using
ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Select,

what I want to be able to do is move 2 rows down and then in column A on
that row put the word line and column B put the word Ind.

Hope someone can help

Thanks