自動実行（開く閉じる・シートアクティブ）

起動時

Private Sub Workbook_Open()

　MsgBox "hello world"

End Sub

終了時

BeforeClose を使うとブックを閉じた時に実行される。

Private Sub Workbook_BeforeClose(Cancel As Boolean)

　MsgBox "さようなら"

End Sub

シートアクティブ

対象のシート選択時実行。