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

執筆者:

関連記事

no image

AccessのBeforeUpdateでUndo

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

no image

Access 2007 Runtime Released

とうとうこの日がきたか。 「6/26公開」「6/27ダウンロード中止」「7/20再公開」って経緯で、今日現在ダウンロードできる。 MS-Access Discovery – ニュース Ac …

no image

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

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

no image

Accessでファイル選択ダイアログを開いて選択したExcelファイルの先頭シートを読み込み番号が一致するデータの配送日を本日日付で消し込む処理

ファイル選択ダイアログを開いて、選択したExcelファイルの先頭シートを読み込み、番号が一致するデータの配送日を本日日付で消し込む処理(楽天販売DB.mdb) ダイアログを表示する際には、事前にMic …

no image

.htaccessと25番ポートブロック

初めてレンタルサーバの乗り換えにチャレンジした、昨日客先。 前日から今朝まで、新アドレスでの表示はずっと「500 Internal Server Error」。 乗り換え先レンタルサーバにサポート依頼 …