Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


54623 / 76732 ←次へ | 前へ→

【26895】Re:他ブックが閉じられたことを知る方法
質問    - 05/7/22(金) 19:41 -

引用なし
パスワード
   ▼ichinose さん:
レスありがとうございます!
質問がわかりづらくてすいませんでした。

具体的に言うと、
1)まず、各機能でクリティカルエラーが発生した場合に自分自身を引数にして、
 共通機能のHandleCriticalErrorを呼びます。

2)HandleCriticalErrorは、エラーをダイアログで表示して、
 渡されたブックを閉じます。

3)各機能のブックにあるbefore_closeイベントの中で、
 showMenuを呼んでメニューを表示するのですが、
 各機能のブックが閉じられると同時になぜかメニューも閉じられてしまいます

以下がコードです。

--------メニュー用のブック---------
    Public Sub ShowMenu()
      frmMenu.Show 0
    End Sub

    Public Sub HandleCriticalError(ByRef wrkErrorSource As Workbook)
      MsgBox "Error!", vbCritical
      wrkErrorSource.Close False
    End Sub

-------各機能用のブック------------
    Private Sub Workbook_BeforeClose(Cancel As Boolean)
      ShowMenu
    End Sub

    'エラー処理
    On Error Goto Err
        処理
    Err:
      call HandleCriticalError(ThisWorkBook)

これを解決するためにも
各機能のブックが閉じられた後で、メニューを表示するようにしたいのですが、
何かいい方法はありませんか?
1 hits

【26891】他ブックが閉じられたことを知る方法 05/7/22(金) 17:26 質問
【26892】Re:他ブックが閉じられたことを知る方法 ichinose 05/7/22(金) 17:34 発言
【26895】Re:他ブックが閉じられたことを知る方法 05/7/22(金) 19:41 質問
【26896】Re:他ブックが閉じられたことを知る方法 1 ichinose 05/7/22(金) 21:02 発言
【26897】Re:他ブックが閉じられたことを知る方法 2 ichinose 05/7/22(金) 21:20 発言
【26904】Re:他ブックが閉じられたことを知る方法... 05/7/22(金) 23:13 お礼

54623 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free