テーブルに追加したデータフォーム再起動することなくコンボに表示させたい

質問

アクセス2003を使用しています。

図のように
テーブル1とフォーム1があります。
フォーム1の中にはコンボ0があり、値集合ソースはテーブル1です。

テーブル１にデータが追加されれば
それに伴いコンボ0に表示されるデータも追加させていきたいのですが

１、テーブル１に「5」を追加する
２、テーブル１を保存する。
３、コンボ0を開く

をしても新たに追加した「５」は表示されません。
一度フォーム1を閉じて、再度開けば「５」は表示されます。

そうではなく、リアルタイムに
テーブル１に追加したデータを
フォーム１再起動することなくコンボ0に表示させることは可能でしょうか？

vbaで
Private Sub コンボ0_Click()
RowSource = "テーブル1"
End Sub
とやってみましたが
何も変わりませんでした。

ご教授よろしくお願いします。

回答No.1

n-jun · ベストアンサー

イベント＞フォーカス取得後を用いて

Private Sub コンボ0_GotFocus()
コンボ0.RowSourceType = "Table/Query"
コンボ0.RowSource = "テーブル1"
End Sub

とかではどうでしょうか？

お礼

できました！
ありがとうございます。

回答No.2

30246kiku

Private Sub コンボ0_Enter()
　　Me.コンボ0.Requery
End Sub

では、どうなりますか。
（フォーカス取得時に、再クエリします）

お礼

ありがとうございます！できました。