VBAで起動したWORD EXCELがタスクに残らないようにする

ACCESS VBA からWORD EXCELを起動して処理をする際に、エラーが発生したときなど、WORD EXCEL がプロセスとして起動中のままプログラムが終了してしまうために、タスクマネージャーに残ってしまうことがままある。

それを防ぐために、エラー処理に、以下のようなソースを書くことで、WORD EXCEL を終了することができる。

On Error GoTo Err_cmdExcel_Click

・・・・・・・・

Exit_cmdExcel_Click:
Exit Sub

Err_cmdExcel_Click:
MsgBox err.Description
xls.Quit ‘Excelを終了させる
DoCmd.Hourglass False ‘砂時計を止める
Resume Exit_cmdExcel_Click

ワードの場合は Quitの行が

wordApp.Quit ‘Wordを終了させる

となる。