VB Code to open and land at certain position when file is open

Hello:

I need a VB Code to go to last occupied cell in column A in sheets "ClockInOut" when i open the excel file.
Please let me know if you have any questions.
Thanks.

Riz

Hi,

Here is code that will activate the last cell with data in Column A when the workbook is opened.

Private Sub Workbook_Open()

lastrow = Range("A" & Rows.Count).End(xlUp).Row
Range("A" & lastrow).Activate

End Sub

Hope that helps,

Dan

Another:

Private Sub Workbook_Open()
Dim ws As Worksheet
Set ws = Sheets("ClockInOut")
Application.Goto ws.Range("A" & ws.Range("A" & Rows.Count).End(3).row), True
End Sub