To give the user the opportunity to enter the row number, you'll want to use an input box.
dimension a variable as Long, and then assign that variable to the input box results, something like this...
Alternatively, if you don't really want the user to enter the row, and instead just scroll down through all rows, you can build this variable into a loop, incrementing it by one each time.Code:Dim lngUserRow As Long lngUserRow = InputBox("Please enter the row number", "User Input Required")
To select the next blank cell in your destination sheet, i always use the following method (assuming a column of A)...
What this basically does is takes the very last cell in col A (in excel 2003 and earlier), go up to the next cell above with data in, then moves down one row (and selects).Code:Sheets("Round Up").select Range("A65536").End(xlup).offset(1,0).select
Give those a shot - if you need more detailed help (i.e. to write a sample code for you) then let me know.