エクセルを開くと、必ず同じシートから始まるようにしたくて、 Sub auto_open() Work

エクセルを開くと、必ず同じシートから始まるようにしたくて、
Sub auto_open()
Worksheets("Sheet1").Activate
Range("a1 ").Select
End Sub
をマクロに書いたんですが、ファイルを閉じると、やっぱり作業後のページから始まってしまいます。原因がわかる方、お願いします。

No.1 回答者： GooUserラック 回答日時： 2018/03/06 21:01

他のブックから開いていませんか？

他のブックから開いたときは「Sub Auto_Open」は実行されません。
「ThisWorkbook」の「Private Sub Workbook_Open()」イベントに以下のように記述すれば実行されます。
Private Sub Workbook_Open()
Worksheets("Sheet1").Activate
Range("A1").Select
End Sub

もう一つ、開くときにマクロを無効にされる可能性が有るならば「ThisWorkbook」の「Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)」イベントに以下のように記述して保存するときに強制的に切り替えるのも有りかと…
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Sheet1").Activate
Range("A1").Select
End Sub