HOME > 即効テクニック > Excel VBA > ファイル操作関連のテクニック > ブックのオープンとクローズ時にメッセージボックスを表示する

即効テクニック

ファイル操作関連のテクニック

ブックのオープンとクローズ時にメッセージボックスを表示する

(Excel 97)
ブックをオープンした時に発生するイベント「Open」とクローズ時に発生するイベント「BeforeClose」で、次のように処理します。
Visual Basic Editorを起動してプロジェクトエクスプローラの「ThisWorkbook」をダブルクリックするとコード入力画面が出ます。
(General)となっているドロップダウン(<オブジェクト>ボックス)をクリックし「Workbook」を選択すると自動的に
Private Sub Workbook_Open()

End Sub
と表示されるので、そこにオープン時に行う処理を記述します。

【例】
Private Sub Workbook_Open()
    MsgBox "ブックをオープンしました"
End Sub
クローズ時のイベントは、コード入力画面の「Open」となっているドロップダウン(<プロシージャ>ボックス)をクリックし「BeforeClose」を選択し、クローズ時に行う処理を記述します。

【例】
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    MsgBox "ブックをクローズしました"
End Sub