動画で三流解説
動画の簡単な説明
コンボボックスをシートに貼り付けます。
あとは、コードを書くんだけど、
まずは、テスト用のボタンを1つ作って、コンボボックスの中身に追加してみます。
Private Sub CommandButton1_Click() ComboBox1.Clear '中身をクリアー ComboBox1.AddItem "111111" '追加する ComboBox1.AddItem "222" ComboBox1.AddItem "cccc" ComboBox1.AddItem "eeee"
End Sub
Private Sub ComboBox1_Change() Range("A1") = ComboBox1.Value '値の代入
End Sub
動画解説やテスト結果
www.youtube.com動画元: シートにコンボボックス を 貼り付ける Control ComboBox - YouTube