ＶＢＡでのコンボボックスに関して

質問

エクセルのＶＢＡで
選択されている項目を指定しているインデックスを取得
する .SelectedIndexのメソッドを使いたいのですが、
.を押してたときに表示されず、使用したとしてもメソッドが見つかりませんというエラーがでます。なぜなんでしょうか？

回答No.2

imogasi · ベストアンサー

下記で上手く行くと思いますが、どこが違うか比べてください。
（１）のあたりとか、Ｌｉｓｔｉｎｄｅｘを使っているとか。
（１）ワークシートのメニュバーの余白で右クリック。
ツールバーの中の「コントロールツールボックス」をクリック。
（２）「コントロールツールボックス」の中からコンボボックスをクリックしシートに貼り付け。
（４）ＶＢＥの挿入－標準モジュールをクリックして
Sub test01()
Worksheets("sheet1").ComboBox1.AddItem "大阪"
Worksheets("sheet1").ComboBox1.AddItem "神戸"
Worksheets("sheet1").ComboBox1.AddItem "京都"
End Sub
を入れる。（内容は一例）
実行する。
（５）Ｓｈｅｅｔ１のＣｏｍｂｏｂｏｘ１のイベント
を選び
ＶＢＥ画面に
Private Sub ComboBox1_LostFocus()
ActiveCell.Value = ComboBox1.Text
MsgBox ComboBox1.ListIndex
End Sub
（６）コンボボックスのアイテムを選択し、望みのセル
をクリックすると、値のセットと選択されたIndex値が
MsgBoxで表示される。(大阪は０）

を入れる。

回答No.1

taknt

Worksheets("sheet1").ComboBox1.ListIndex
もしくは
Sheet1.ComboBox1.ListIndex
というふうに 用います。