Excel VBA質問箱 IV

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

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


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

35854 / 76732

←次へ　｜　前へ→


	【46069】Re:シートに貼り付けたComboBox

ichinose - 07/1/22(月) 12:37 -


	引用なし

	パスワード

▼k.akira さん：
こんにちは。

>シートに貼り付けたComboBoxにリストを表示させる方法をどなたか教えてください。フォームの表示方法は出来ます。

シートに貼付け可能なコンボボックスには、
コマンドバー「フォーム」のそれと
コマンドバー「コントロールツールボックス」にあるものと二つあります。

必ず、形容をして下さい。

「コントロールツールボックス」のコンボボックスだと思って・・・。

標準モジュールに
'======================================
Sub main()
　　With ActiveSheet.OLEObjects("ComboBox1").Object
　　　 .Clear
　　　 .List() = Array("a", "b", "c", "d", "e", "f")
　　　 .ListIndex = 0
　　　 .DropDown
　　　 End With
End Sub

として、当該シートをアクティブにした状態で実行してみて下さい。

0 hits

▼

【46068】シートに貼り付けたComboBox k.akira 07/1/22(月) 12:26