![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
No.1ベストアンサー
- 回答日時:
Requeryというメソッドを使うとよいと思います。
ただ、Requeryを使うと通常の方法ではカレントレコードが先頭に戻ってしまいますので、カレントレコードがそのままで、更新できるようにします。
以下、私の覚書をそのままコピペします。
*******************************************************
●Requeryしてもカレントレコードを移動しないようにする方法
言い換えると、カレントレコードを移動させないでRequery(更新)する方法
サブフォーム(単票、帳票どちらでも可)を作って、
サブフォーム/サブレポートコントロールに対してRequeryをかけるだけでそうなる。
サブフォーム/サブレポートコントロール名 は通常はサブフォーム名と同じ場合が多い。サブフォーム/サブレポートコントロールは埋め込みオブジェクト。
サブフォームは、サブフォーム/サブレポートコントロールと実際のフォームの2つから成っている。そこを理解しておかなければならない。
メインフォームだけを作ってサブフォームを作らない場合、つまり、直接メインフォームでデータを表示させ、Me.Requery とやる場合は当然ダメ。
APIを使う方法などの他の方法でやらなければならない。
●メインフォーム上のコマンドボタンでRequeryする場合
コマンドボタンのクリック時イベントに次のように書く。
Forms("メインフォーム名")("サブフォーム/サブレポートコントロール名").Requery
または
Me("サブフォーム/サブレポートコントロール名").Requery
●サブフォーム上のコマンドボタンでRequeryする場合
メインフォーム名やサブフォーム名を汎用的な感じのコードでやってみた。
ボタンのクリックイベントに書く。
'『 実行時エラー '2118'
' "Requery/再クエリ"アクションを実行する前に、
' カレントフィールドを保存する必要があります。』
'が出たら以下の1行を足す。出なければコメントアウト。
'念のためコメントアウトしないほうがいいかも
DoCmd.RunCommand acCmdSaveRecord
'リクエリをする。
'より汎用的にするには、Parentを使わないほうが
'いいのかもしれない。
Parent(Screen.ActiveForm.ActiveControl.Name).Requery
●メモ
サブフォームのどこかのコントロール(テキストボックスなど)にフォーカスがある場合、そのサブフォームを格納するサブフォーム/サブレポートコントロールの名前を取得するには、
Screen.ActiveForm.ActiveControl.Name で取得できる。
サブフォームにフォーカスがある場合、
Screen.ActiveForm.Name
を実行すると、メインフォームの名前が出てきてしまう。
しかし、逆にいうと、サブフォームにフォーカスがある場合なら
メインフォームのサブフォーム/サブレポートコントロールが絶対にアクティブになっているはずなので、それを利用する。
「Parent」の部分は、Meでも良いし、オブジェクト変数名でもよい。
が、オブジェクト変数名のほうが汎用的にしやすいのでそちらのほうがいいと思われる。
以上のことから、フォームを作成するときは、基本的には
できるだけサブフォームを作ったほうがよいかもしれない。
これ以外のメリットもあるし。
「メインフォーム上にデータを表示しないといけないとき」は
無理しないで、普通にメインフォームを使えばいい。
サブフォームの中のサブフォームというのもまた面倒になるので。
もしくは、サブフォームのサブフォームが必要な場合は、別フォームを開く形にして、
そこでもメイン+サブという形を貫くか。そうすると汎用コードが作りやすくなるかもしれない。
別に2画面同時に表示することもできるわけなので。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- その他(データベース) 更新クエリをリンクデータベーステーブルに実行し実行時エラー3362固有インデックスに重複する値が含ま 1 2022/09/21 11:44
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Access(アクセス) アクセスの更新クエリでカレントレコードのみ更新したい 1 2022/06/02 23:32
- Access(アクセス) accessについて(超初心者です) 1 2023/02/11 11:18
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- Excel(エクセル) 【vba】日付の形式が勝手に変わってしまう。 1 2022/09/29 10:54
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
Access サブフォームでの選択行の取得
その他(データベース)
-
-
4
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
5
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
6
Access VBA Me.Requery レコードは削除されています エラー
その他(データベース)
-
7
AccessのRefresh・Requery・Repaintの違い
Access(アクセス)
-
8
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
9
どこにもフォーカスを当てたくない
Access(アクセス)
-
10
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
11
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
12
ACCESSでコントロールソースの変更
Access(アクセス)
-
13
ACCESSでタイトルバーを非表示にする方法
Access(アクセス)
-
14
ACCESSのBookmarkプロパティの使い方
その他(データベース)
-
15
Access「レコードが削除されました」のエラー
Access(アクセス)
-
16
Accessの画面更新を一時的に停止する方法。
その他(データベース)
-
17
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
18
ACCESSフォーム入力後の確定
Access(アクセス)
-
19
Accessフォームで詳細内の任意の行へSetFocus
Excel(エクセル)
-
20
ACCSESS2013VBA フォームのレコードソースを変更する
その他(データベース)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
サブフォームに対してGoToRecor...
-
ACCESS──メインフォームでサブ...
-
サブフォームのあるフォームか...
-
クエリで出来た表にチェックボ...
-
ACCESSにて
-
アクセス2003のサブフォームの...
-
親フォームからサブフォームの...
-
サブフォームのフォームフッタ...
-
親・子リンクフィールドの設定...
-
サブフォームに変数を代入し、R...
-
Access 登録ボタンからサブフォ...
-
ACCESSのフォームで列固定?
-
ACCESSサブフォームにデータ反...
-
access サブフォーム作成につ...
-
Accessでサブフォームのボタン...
-
Access VBAでメインフォームと...
-
accessサブフォームでのパラメータ
-
アクセスのサブフォームでのト...
-
Access2013 テーブル上日付で入...
-
DLookup関数を使ってサブフォー...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
サブフォームに対してGoToRecor...
-
クエリで出来た表にチェックボ...
-
親フォームからサブフォームの...
-
ACCESS──メインフォームでサブ...
-
皆さん使っているブラウザを教...
-
親・子リンクフィールドの設定...
-
サブフォームを非表示させる方...
-
Accessで埋め込んだサブフォー...
-
Access フォームで条件抽出し...
-
ACCESSのサブフォームコピーに...
-
ACCESSのフォームで列固定?
-
ACCESS VBA メインフォーム及び...
-
Access 登録ボタンからサブフォ...
-
サブフォームに変数を代入し、R...
-
ACCESSサブフォームにデータ反...
-
Access2007 ラベルの削除がで...
-
ACCESS 帳票フォームとデータ...
-
全てのサブフォーム名を取得したい
-
サブフォームのあるフォームか...
-
【Access】サブフォームのソー...
おすすめ情報