複数のコンボボックスに同じデータソースを表示させるには？ (ID:123517)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 コンボボックスにアイテムを追加する処理だけを考えるなら メソッドを作ってみては？ 多分こんな感じ・・・ 的を得てなかったらスルーで構いませんorz Private Sub cboAddItem(cboObje As ComboBox) Dim intcnt As Integer For intcnt = 1 To 10 Step 1 cboObje.AddItem CStr(intcnt) Next End Sub 配列を使ってもっと丁寧に書いてみてください。