I currently use the below code to find the next empty cell in a database ready for the next data input! Is there any other way of performing this action without actually selecting the cell? In other words removing the (.Select) from the code!
Sheets("Sheet1").Range("A65536").Select
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Range("A1").Select
I’m sure I’ve seen some code like Sheets(“Sheet1”).UsedRange.Offset(1, 0).Set I’m not sure though!
Can anybody suggest anything?
Any help will be much appreciated
Cheers
Ryan UK
This message was edited by razzandy on 2002-09-19 16:00
Sheets("Sheet1").Range("A65536").Select
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Range("A1").Select
I’m sure I’ve seen some code like Sheets(“Sheet1”).UsedRange.Offset(1, 0).Set I’m not sure though!
Can anybody suggest anything?
Any help will be much appreciated
Cheers
Ryan UK
This message was edited by razzandy on 2002-09-19 16:00