MS Access

Accessの再クエリーでデータが移動してしまうのを解消

投稿日:2008年8月20日 更新日:

仕事メモ。

メイン・明細フォームのときは、
http://www.sanryu.net/acc/tips/tips323.htm
を参考に、
Dim m_offset As Long ‘レコード位置記憶用
m_offset = Me.CurrentRecord
Me.Requery
DoCmd.GoToRecord , , acGoTo, m_offset
——————

メイン上のサブフォームのときは、
http://www.f3.dion.ne.jp/~element/msaccess/AcTipsFrmHowToRequeryAndReturn.html
を参考に、
Me![サブフォーム コントロール名].Requery

※ 「Me![サブフォーム コントロール名].Form.Requery」とコーディングしない点に注意
——————

T’sWareには、Bookmarkを使う方法あり。使わなかったけど。
http://www.tsware.jp/tips/tips_163.htm
を参考に、

Dim rst As Recordset
Dim varBookMark As Variant

Set rst = Me.Recordset
varBookMark = rst.Bookmark
Me.Requery
rst.Bookmark = varBookMark

-MS Access

執筆者:

関連記事

Access「実行時エラー3061 パラメータが少なすぎます。2を指定してください」で意外な決着

クロス集計クエリをVBAで読むときで、かつパラメータクエリを使う場合には、クエリのパラメータパネルで、別途、パラメータを指定しなくてはならない(VBAで使わないなら不要) 本日のトラブルは、その後、W …

no image

AccessのBeforeUpdateでUndo

BeforeUpdateプロシージャ内の処理で、Cancel = Trueとしたら更新がキャンセルされるところまではできたが、テキストボックスにNullを代入しようとしてエラーが出たりして、間違って入 …

no image

Accessで、見積書のような「サブフォームつきフォームを丸々コピー」する方法・・・見つけるのに、四苦八苦。

最初、複雑でかつ読み取り専用のクエリを元にしたフォームをコピーしようとしていたために、 acCmdPasteAppendのラインで「コマンドまたはアクション”追加貼り付け”は無効です」のエラーが出て、 …

no image

Accessクエリでのフィールド名は同じので重複できる

Accessではクエリの中で同じフィールド名を使えない! ・・・とずっと思っていた。 なので、テーブルで使っているフィールド名でクエリの結果を出す必要があった際には、クエリを二つ作ってそれぞれ前処理 …

no image

AccessのDoCmd.OpenForm acPreviewでデータが表示されない

なぜか、フォームに新規データを入力し、印刷プレビュー(DoCmd.OpenForm “見積請求書F”, acPreview)した際に、それまで入力したデータが消えたようになる。 …