ワード：コンボボックス

質問

コントロールツールボックスでコンボボックスを設定したいです。
選択肢はどのように設定すればよいか教えてください。

回答No.2

うぃず（@Wizard_Zero） · ベストアンサー

#1 Wizard_Zeroです。

マクロコードです。Alt+F11でコード編集画面になります。コードは、Project - ThisDocument に書きます。

マクロを実行するには、[ツール]→[マクロ]→[マクロ](あるいはAlt+F8)で呼び出します。

文書を開いた時に追加されている状態にしたければ、Document_Openイベント内に記述します。

Private Sub Document_Open()
Call ComboBox1.AddItem("AAA")
Call ComboBox1.AddItem("BBB")
Call ComboBox1.AddItem("CCC")
Call ComboBox1.AddItem("DDD")
End Sub

VBA(マクロ)の基礎的な知識は必要です。

お礼

ありがとうございした
できました！！！
助かりました。

回答No.1

うぃず（@Wizard_Zero）

Wizard_Zeroと申します。

VBならListプロパティで直接設定できるのですが、VBAでは出来ないようです。コードで選択項目(リストアイテム)を追加してください。
こんな感じです。

Private Sub Test()
Call ComboBox1.AddItem("AAA")
Call ComboBox1.AddItem("BBB")
Call ComboBox1.AddItem("CCC")
Call ComboBox1.AddItem("DDD")
End Sub

補足

ありがとうございます！！

試してみたのですが，やり方がよくないようで，うまくいきませんでした。
WORD文書自体のマクロのコードでしょうか・・？