opening sheet, next available cell displayed
When I open a workbook/sheet, I want the next available cell for data entry
to be displayed, at the moment the page scrolls somewhere halfway up existing data, meaning I have to scroll down to the next data entry point. Can I do this ?? |
opening sheet, next available cell displayed
Put this on a workbook open event, change sheet name and cell column as
needed Private Sub Workbook_Open() Sheets("sheet1").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).Select End Sub -- -- -John Please rate when your question is answered to help us and others know what is helpful. "Stephen" wrote in message ... When I open a workbook/sheet, I want the next available cell for data entry to be displayed, at the moment the page scrolls somewhere halfway up existing data, meaning I have to scroll down to the next data entry point. Can I do this ?? |
opening sheet, next available cell displayed
Note: If sheet1 is not the activesheet when you open the workbook the code is not working
Use this in the open event Application.Goto Sheets("Sheet1").Cells(Rows.Count, "A").End(xlUp)(2) -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "John Bundy" wrote in message ... Put this on a workbook open event, change sheet name and cell column as needed Private Sub Workbook_Open() Sheets("sheet1").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).Select End Sub -- -- -John Please rate when your question is answered to help us and others know what is helpful. "Stephen" wrote in message ... When I open a workbook/sheet, I want the next available cell for data entry to be displayed, at the moment the page scrolls somewhere halfway up existing data, meaning I have to scroll down to the next data entry point. Can I do this ?? |
All times are GMT +1. The time now is 10:14 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com