宣言したオブジェクトを Application オブジェクトに接続するには(VBA/ActiveX)

オブジェクトのイベントに関連付けられたプロシージャを実行するためには、クラス モジュールで宣言したオブジェクトと Application オブジェクトを接続する必要があります。

1. メイン モジュールのコード ウィンドウで、次の行を宣言セクションに追加します。

   Dim X As New EventClassModule

2. 同じウィンドウで、以下のサブルーチンを追加します。

   Sub InitializeEvents()
     Set X.App = ThisDrawing.Application
   End Sub

3. メイン モジュールのコード内で、InitializeEvents サブルーチンの呼び出しを追加します。

   Call InitializeEvents

   InitializeEvents プロシージャが実行されると、クラス モジュール内の App オブジェクトによって指定された Application オブジェクトが指し示され、イベントが発生したときにクラス モジュール内のイベント プロシージャが実行されます。