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

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