How to get pointer in new cell on Open?
I want to have the pointer in the next new cell each time I open the
workbook. is there a way to do this? Thanks |
Hi Jazz
You can do this for example in the workbook open event (user must enabled macro's) to insert the date in a cell every time you open it on a new line in "Sheet2" Private Sub Workbook_Open() Dim lr As Long With Sheets("sheet2") lr = .Range("A" & Rows.Count).End(xlUp).Offset(1, 0).Row .Cells(lr, "A").Value = Date .Cells(lr, "B").Value = Environ$("username") End With End Sub See also http://www.cpearson.com/excel/events.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Jazz Drummer" wrote in message ... I want to have the pointer in the next new cell each time I open the workbook. is there a way to do this? Thanks |
Ron,
Thanks for the info! "Ron de Bruin" wrote: Hi Jazz You can do this for example in the workbook open event (user must enabled macro's) to insert the date in a cell every time you open it on a new line in "Sheet2" Private Sub Workbook_Open() Dim lr As Long With Sheets("sheet2") lr = .Range("A" & Rows.Count).End(xlUp).Offset(1, 0).Row .Cells(lr, "A").Value = Date .Cells(lr, "B").Value = Environ$("username") End With End Sub See also http://www.cpearson.com/excel/events.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Jazz Drummer" wrote in message ... I want to have the pointer in the next new cell each time I open the workbook. is there a way to do this? Thanks |
All times are GMT +1. The time now is 09:09 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com