next blank row

Joseph McGowan · Apr 25th, 2002, 08:03 AM

If I have a macro button on a sheet and when this is clicked I would like column B of the next blank row selected for user input and in column A I would like the Date to appear.

What code do I use for this to happen.

I am trying something like
intLastRow = Sheets("New Joins").Cells(65000, 1).End(xlUp).Row
New Joins is the name of the worksheet.
It is not selecting the correct cell.

Can anyone help me please.

I have not worked out how to do the date part.

jrnyman · Apr 25th, 2002, 08:09 AM

Try this:

intLastRow = Sheets("New Joins").Range("A65536").End(xlUp).Row
Cells(intLastRow+1),1).Formula = "=TODAY()"
Cells(intLastRow+1),2).Select

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 25th, 2002, 08:03 AM	#1
Joseph McGowan New Member Join Date: Mar 2002 Posts: 11	If I have a macro button on a sheet and when this is clicked I would like column B of the next blank row selected for user input and in column A I would like the Date to appear. What code do I use for this to happen. I am trying something like intLastRow = Sheets("New Joins").Cells(65000, 1).End(xlUp).Row New Joins is the name of the worksheet. It is not selecting the correct cell. Can anyone help me please. I have not worked out how to do the date part.

Apr 25th, 2002, 08:09 AM	#2
jrnyman Board Regular Join Date: Mar 2002 Location: Boston, MA Posts: 105	Try this: intLastRow = Sheets("New Joins").Range("A65536").End(xlUp).Row Cells(intLastRow+1),1).Formula = "=TODAY()" Cells(intLastRow+1),2).Select