ベストアンサー

VBAでイベント発生時に自分の呼ばれたコマンドを知る方法

2004/08/26 07:04

イベントが発生したときに自分がどのオブジェクトから呼ばれているイベントか知る方法ってありますか？あるいは上から何番目のコマンド（縦に同じコマンドがズラッと並んでいるイメージ）から呼ばれているかをイベント内部から知る方法ってありますか？今コーディングで新規フォームを作ってそこにレコード数だけコントロールを配置するというコーディングを考えております。そのコマンドにクリックイベントも発生させたいので、コントロールを作成してイベントを埋め込むという作業まではできたのですが、不特定多数のコマンドボタンの作成設置方法に悩んでおります。ＶＢＡではコントロールの配列はできないので、コントロールの名前などを全て変えて作らなければなりません。そこをどうするかで頭を悩ませています。しかも後でどのコントロールがクリックされて呼ばれたのかも知りたいので、コントロール配列のindex番号みたいなものを取得しておく必要もありますが、何か良い方法はないでしょうか？いっそのことコマンドの名前を数字にして、後でそのコントロール名とかオブジェクトのメソッドを参照してインデックス番号を取得・・・みたいなことを考えてたのですが、たしか既存の（目に見えて形となっている）（オブジェクト名自体を持っている）コントロールのメソッドを使用するのはかなり不可能だったような気がするので、タグやオブジェクト名も拾えない気がします。ＶＢなら同じイベント内容のコマンドを全て配列にしてまとめてクリックイベントにしてそのIndexを見ればプロシージャ１つで済みますが、ＶＢＡで似たような方法をする方法を教えてください。ループで回しながらオブジェクト名の違うコントロールを配置する方法は自分でなんとかやってみますのでindex番号の取得の方法だけお願いします。