Microsoft Access 2003の知識をお貸し下さい。

Question

crashtruck5

234

231もっと見る

70pt

コンピュータ書籍・音楽・映画

Microsoft Access 2003の知識をお貸し下さい。

現在、フォームAに、リレーションシップで接続された他のテーブルに関連付けられたコンボボックスを配置しています。コンボボックスのリスティングに希望するレコードが無い場合、同コンボボックスと関連付けられたフォームBを開くため、「フォームBを開く」ボタンを押して、希望するレコードを追加した後、同じくフォームBに配置された「フォームを閉じる」ボタンで同フォームを閉じます。その後、自動的にフォームAに戻るわけですが、フォームAの「データの再表示」ボタンを押さないと、フォームBで行ったレコードの追加がコンボボックスのリスティングに反映されません。

そこで、この「データの再表示」ボタンを押す手間を省くには、どのような方法があるでしょうか。

できるｄけ具体的にご解説いただければ幸いです。

回答の条件

1人2回まで

登録：2008/12/10 05:01:14
終了：2008/12/17 05:05:02

※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

コメントはまだありません

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

リクエスト送信済

回答リクエストを送信したユーザーはいません

fuentebella · Answer 1 · 2008-12-10T10:24:51+09:00

フォームBの「フォームを閉じる」ボタンを押したときに、フォームAを再表示させてからフォームを閉じるようにすればよいと思います。

フォームBをデザインビューにした状態で、フォームBの「フォームを閉じる」ボタンを右クリック　「イベントのビルド」をクリック
出てきた画面の　DoCmd.Closeの行の直前にフォームA.Refresh 入れます。

     [Forms]![フォームA].Refresh
     DoCmd.Close

　フォームAは、実際のフォームの名前です。もしフォームが「営業コード追加」という名前だったら

[Forms]![営業コード追加].Refresh

fester · Answer 2 · 2008-12-10T16:12:00+09:00

フォームB に次のコードを追加してみてください。


Private Sub Form_Close()
    If CurrentProject.AllForms("フォームA").IsLoaded Then
        '元のフォームが開いていたら、コンボを再クエリ
        Forms!フォームA!コンボ名.Requery
    End If
End Sub

Microsoft Access 2003の知識をお貸し下さい。

回答（2件）

fuentebella269302008/12/10 10:24:51

fester124202008/12/10 16:12:00

コメント（0件)

この質問への反応（ブックマークコメント）