Your example was perfect! Thank you.

"Jim Thomlinson" wrote:

Try this

activesheet.cells(rows.count, "A").end(xlup).offset(1, 0).select
activecell.value = "This"
Activecell.offset(0, 1) = "That"
--
HTH...

Jim Thomlinson


"Rick" wrote:

I actually have tried this and believe it is working but how would I enter
the data in this cell? I have tried things such as ActiveCell.FormulaR1C1 =
"1000" but I must be missing something.

"Jim Thomlinson" wrote:

this line will select the first blank cell in column A on the active sheet.

activesheet.cells(rows.count, "A").end(xlup).offset(1, 0).select
--
HTH...

Jim Thomlinson


"Rick" wrote:

Is there a way to add a row of data to a worksheet using a macro? I need to
determine the last row of data already there and then append on the next row
some static data. The rows of data will change each time I use this workbook.

Example:
On a cloumn with 1224 rows of data, I need to add on the 1225 row the number
1000 automatically. The rows of data will change each time I use this
workbook.

Thank you

Ric