フォームを開くときに、コンボボックスの値を選択（アクセスVBA)

質問

こんにちは。
アクセスVBAで、フォームを開いたとき
（フォームのOpenイベント）に、
コンボボックスの値を選択したいのですが、
どういう方法が、あるでしょうか。

理想は、
フォームのOpenないし、Loadイベント内で、
コンボ0.ItemData(2).Selected
と、書くような感じです。
（無論、Selectedは使えませんでした）。

よろしくお願いします。

回答No.1

AlexSuns · ベストアンサー

これでいいのかな？
※テキスト書きなので検証していません

If コンボ0.ListCount > 0 Then
　　コンボ0.Value = コンボ0.Column(0, 2)
End If

お礼

回答ありがとうございます。
コンボ0.Value=コンボ0.ItemData(2)
でできました。
考え方は、同じですね。
ありがとうございました。

回答No.2

sugao_chib

こんばんは
インデックスで指定するなら
　コンボ0.Value = コンボ0.ItemData(2)
値で指定するなら(値がわかっているなら)
　コンボ0.Value = "??"
こんな感じでどうでしょう。

お礼

回答ありがとうございます。
コンボ0.Value=コンボ0.ItemData(2)
でできました。
ありがとうございました。