Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

63956 / 76807

←次へ　｜　前へ→


	【17441】イベントが実行されません

SHIP - 04/8/29(日) 20:28 -


	引用なし

	パスワード

バージョン)EXCEL2000

今シート上に動的にコントロールを作成したり削除したりする（コントロールの数の上限は決まっている）処理を作っています。
そこで、コンボボックス、コマンドボタンにそれぞれイベントがあるので、あらかじめ上限分のイベント(CommandButton_Click、ComboBox_Change)を作成しておいて、OLEObjects.AddとOLEObjects("ｺﾝﾄﾛｰﾙ名").Deleteを使用して処理を作成しました。
その際

Dim Ole As OLEObject

OLEObjects("ｺﾝﾄﾛｰﾙ名").Delete
Set Ole = OLEObjects.Add Left:=～
Ole.Name = "ｺﾝﾄﾛｰﾙ名"

として作成したにもかかわらず、ｺﾝﾄﾛｰﾙ名_Click()イベントが実行されません。しかもイベントが発生する場合もあり、現象がランダムです。
原因はどうやらイベントが発生しなかったコントロールはデザインモードのプロパティウインドウには定義した"ｺﾝﾄﾛｰﾙ名"ではなくCommnadButton12などになっていて認識されていない様子です。

どなたか回避方法をご存知の方教えてください。お願いします。

0 hits

▼

【17441】イベントが実行されません SHIP 04/8/29(日) 20:28

≪