下記コードでcomboboxをつくったのですが
作成されたCombobox1のComboBox1_Changeエベントに
標準モジュール内のSub cal をVBAで割り当てたいのですが可能でしょうか。
コンボボックス作成マクロ
x=0
y=0
With Worksheets("Sheet1").OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, DisplayAsIcon:=False)
.Left = X
.Top = Y
.Width = 53.25
.HEIGHT = 18
.ListFillRange = "AAA"
End With
これで作成したコンボボックスに標準モジュール内マクロをVBAで割りあてしたい。
標準モジュール
sub cal
・
・
end sub
No.3ベストアンサー
- 回答日時:
三度です
>ComboBoxを貼り付けるシートも毎回作成するのでこれもだめで
打開案ですがどうでしょうか?
作成するシートにComboBoxを貼り付けるのではなく、
ComboBoxが張り付いているシートをコピーする
(ComboBoxが張り付いているシートは非表示)
これだと、関数自体もコピーされますし、
関数名も固定でいけます
参考までに
この回答への補足
説明不足ですみません。
Sheet1でComboBoxを何個貼り付けるか決定(1~100)
そのあとSheet2に貼り付ける
その貼り付け位置も他の条件で12種類あるので
かなり複雑になりそうです。
が、ほかに方法もなさそうなのでやってみます。
No.2
- 回答日時:
勘違いすみません
OnActionプロパティでマクロを登録するのですが、ComboBoxだとできないみたいです。
ちなみに、CheckBoxだとできます。
With ActiveSheet.CheckBoxes.Add(10, 10, 20, 20)
.Name = "CheckBox " & .Index
.Caption = ""
.OnAction = "cal"
End With
手として
ComboBox_Change関数をあらかじめ複数個書いておく
というのはダメでしょうか?
この回答への補足
ありがとうございました。
ComboBoxはだめですか。
ComboBox_Change関数をあらかじめ複数個書いておくのも考えたのですがそもそもComboBoxを貼り付けるシートも毎回作成するのでこれもだめで。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) パーソナルXLSBのfuctionを呼び出すと「Functionが定義されていません」のエラーになる 2 2022/08/22 22:51
- Visual Basic(VBA) Excel・ユーザーフォームの情報を受け渡したい 4 2022/06/08 10:11
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Excel(エクセル) エクセルのイベントVBAを複数のシートで動かしたい 1 2022/12/07 16:55
- PowerPoint(パワーポイント) ExcelのVBAコードについて教えてください。 3 2022/05/25 14:32
- Visual Basic(VBA) マクロについて教えてください。 4 2023/06/06 09:06
- Visual Basic(VBA) QRコード作成マクロについて 3 2022/11/26 16:55
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
同じ作業を複数のシートに実行...
-
Excelマクロのエラーを解決した...
-
特定の文字を含むシートだけマ...
-
excelのマクロで該当処理できな...
-
ExcelのVBAのマクロで他のシー...
-
【ExcelVBA】全シートのセルの...
-
VBA 存在しないシートを選...
-
XL:BeforeDoubleClickが動かない
-
ブック名、シート名を他のモジ...
-
実行時エラー'1004': WorkSheet...
-
別のシートを参照して計算する方法
-
ユーザーフォームに入力したデ...
-
Excel チェックボックスにチェ...
-
Excel VBA マクロ あるフォルダ...
-
ExcelVBA シート名を複数セルか...
-
userFormに貼り付けたLabelを変...
-
EXCEL(VBA)でシート保護がかか...
-
EXCELVBAを使ってシートを一定...
-
Excel マクロについての相談
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
Excel VBA マクロ シート名を変...
-
ユーザーフォームに入力したデ...
-
VBA 指定した回数分、別シート...
-
特定の文字を含むシートだけマ...
-
【ExcelVBA】全シートのセルの...
-
excelのマクロで該当処理できな...
-
Excelマクロのエラーを解決した...
-
ブック名、シート名を他のモジ...
-
【Excel VBA】Worksheets().Act...
-
同じ作業を複数のシートに実行...
-
for 文の 繰り返し処理に使える...
-
ExcelのVBAのマクロで他のシー...
-
VBA 存在しないシートを選...
-
XL:BeforeDoubleClickが動かない
-
実行時エラー'1004': WorkSheet...
-
エクセルのシート名変更で重複...
-
Excel チェックボックスにチェ...
-
Excel VBA 複数行を数の分だけ...
-
Worksheet_Changeの内容を標準...
おすすめ情報