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

「3070 有効なフィールド名または式として認識できません」エラーで、困った

Accessで、クエリ単体での実行だとうまくいくのに、いざ、そのクエリをVBAコード内で実行すると、上記エラーが出る。 難問だった。 SQL文内でDISTINCTを使っているからかなーとか、LEFT …

Accessのフォームをデザインしようとすると固まる

タイミングとしては、フォームをデザインビューにした直後、プロパティシートをクリックしたとき。それだけで数十秒待たされる。 原因は、なんとなく、気が付いている。 ついさっき、フォームで使っているクエリに …

no image

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

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

no image

Accessで1件ずつレコードを読んでスナップショットファイルを作ってメール送信する処理

作るのにWebに情報が無くてすごく苦労したので備忘録。 私にしかわからないかもしれないけど、見た人も何か参考になるかもしれないから、公開しよっと。 ■事前準備 1.処理を起動するフォームにボタン「調査 …

no image

テキスト型の日付をformat関数で揃える

CSV形式のデータからAccessにインポートしたものだから、日付が2012/5/5やら2012/05/05やら、文字列扱い(日付型でない)の混在したデータの入ったテーブルがある。 これをきちんと並べ …