方法一

セールの「ThisWorkbook」にて、「Workbook」の「Open」関数にて、ロジックを追加する

 Private Sub Workbook_Open()
Msgbox "HelloWorld!"
End Sub

方法二

セールの標準モジュールにで、Privateの関数を追加する。(※関数の名称は「xxxx_Open」となる)

 Private Sub Auto_Open()
Msgbox("HelloWorld!!!")
End Sub
05-11 20:14