10.4 ワークブックを閉じる前
ワークブックを閉じる前に何かしておきたいことはありませんか?例えば、入力したデータを送信したり、DBを切断したり…。

そんなときは、ワークブックのイベントWorkbook/BeforeCloseイベントへマクロを書いておけばOKです。
使用例
Workbook/BeforeCloseの使用例です。例では、ワークブックを閉じようとしたときに「そうはさせるかっ!」というメッセージを出し、閉じないようにしています。いやがらせも、いいかげんにしてほしいですね(汗)

ちなみに、引数のCalcelTrueを設定すると「閉じる」の取り消しができます。

Private Sub Workbook_BeforeClose(Cancel As Boolean)

    'メッセージを表示し、ワークブックを閉じないようにします
    MsgBox "そうはさせるかっ!"
    Cancel = True

End Sub
 ※このエクセルマクロはワークブックのイベントへ書くマクロです
Copyright(C) 1999-2006 結城圭介。 All rights reserved