Sub auto_open()
Worksheets("Sheet1").Activate
Range("A1").Select
End Sub
もしくは、
Private Sub Workbook_Open()
Application.Goto Sheets(1).Range("A1"), True
End Sub
Sub auto_open()
Worksheets("Sheet1").Activate
Range("A1").Select
End Sub
もしくは、
Private Sub Workbook_Open()
Application.Goto Sheets(1).Range("A1"), True
End Sub