Access2010 VBA コンボボックスの任意の列をコードから選択したい

Question

Access2010にて開発を行っているものです。
開発環境はWindows7 Enterprise 32bitです。
下記の内容についてご教授願います。

画面の読込時にコンボボックスの任意の値が選択される処理を行いたいです。
コンボボックスにはあらかじめ【1列目：名称】【2列目：ID】のように2列で値を持たせています。
例）
【名称】 【ID】
AAA 1
BBB 2
CCC 3

ここで任意の値が"CCC"であれば、フォーム上には【CCC】が表示されている、かつ2列目の値としてはIDである【3】が保持されている状態にしたいです。

しかし、
コンボボックス.Value = "CCC"
のようにValueに代入しても、2列目の値であるコンボボックス.Column(1)はNULLとなってしまい思うようにいきません。

行いたい処理の理想は、
コンボボックス.値を選択("CCC")
のように書くと"CCC"が選択された状態になっており、
コンボボックス.Column(1) = "3"
となっていることです。

回答に必要な情報の不足点も教えて頂ければ幸いです。
お願いします。

Comments

[coco_bauer]

コンボボックスに関する設定や初期化などのコードを追加してください。『コンボボックス.Column(1) = "3"』のようなコードの断片だけを書かれても、よく理解できません。

Answer 1

単純なフォームを作成してコンボボックスを作成して非連結の固定データで確認したところ、
Form_Load時に「コンボボックス.Value = "CCC"」とするだけで
問題なく「コンボボックス.Column(1)」の値は"3"になりました。

コンボボックスのリストの作成のタイミングが間違っていたり
別の処理によってクリアされていたりする可能性はないでしょうか？

Comments

[Gidemo]

お返事が遅くなり申し訳ありません。
お二人とも回答ありがとうございました！

本日もう一度試したところうまくいきました。
nakitさんの仰る通り、リストを作成する前にコンボボックスの値を設定していたためのようです。

修正内容に近かったnakitさんをBAにさせて頂きます。
お二人ともありがとうございました！！！

Answer 2

同じくAccess 2010で試してみましたが、私の場合は普通に成功しますね。
例えば以下のコードだと、2が表示されます。

Private Sub コマンド1_Click()
    コンボ0.Value = "BBB"
    MsgBox コンボ0.Column(1)
End Sub

値集合ソースは「AAA;1;BBB;2;CCC;3」です。
何か変なプロパティを設定してしまったのではないですか。

コンボボックスを貼り付け直して試してみても事象は変わらないでしょうか。