ようこそ ゲスト さん、新規登録（無料）して気になる疑問を解決しませんか？
はじめての方へ｜ヘルプ｜FAQ

質問
質問者：sskj Access2003　入力フォームの表示検索について
困り度：
  • 困っています
 フォームに非連結のボックスを作成し、以下のようなコードを追加し検索用に作成したのですが、
これが不味いのか、稀にデータの修正を行うと違うデータがTabキーもしくは矢印キーの移動で変わってしまいます。

例：
ID1
店名　A店
住所　A県
代表者　A様

このデータの店名ボックスの店名をB店に変え、Tabや矢印で
次のボックスに移動すると、
ID1
店名　B店
住所　C県
のように関係ないデータが表示され、さらに移動すると

代表者　C様

と別のデータが移動するごとに表示されてしまいます。
（関係の無い別のIDデータが表示される。）

なぜこのようなことが起きるのでしょうか？
もし分かる方回答のほどお願いします。

企業コード（検索するフィールド）
テキスト_ID検索（ボックス名）

Private Sub テキスト_ID検索_AfterUpdate()
Dim rs As DAO.Recordset
If IsNumeric(Me.テキスト_ID検索) Then
Set rs = Me.RecordsetClone
rs.FindFirst "企業コード=" & Me.テキスト_ID検索
If rs.NoMatch Then
'番号が見付からなかった場合の処理
MsgBox "データが見付かりません。"
Else
Me.Bookmark = rs.Bookmark
End If
rs.Close
End If
End Sub
質問投稿日時：08/07/02 16:57
質問番号：4146039
この質問に対する回答は締め切られました。
最新から表示｜回答順に表示｜良回答のみ表示

回答

良回答10pt
回答者：Dxak ＃１です

> サブフォームを使っているのですが、
> この辺りの影響もあるのでしょうか？

これが、あるか？となると・・・普通は無いです
問題があるとすれば、違うＶＢＡが発生している可能性があります

> Me.Bookmark = rs.Bookmark

の部分で、レコード移動が起こってます
これによって・・・
Activate （フォーム）
Current （フォーム）
Enter (コントロール)
GotFocus (コントロール)
等、発生してます
そのあたりに、モジュール記載してませんか？

普通に考えて、レコード移動が発生する可能性は、他に無いので、SendKeyで、何か送るモジュールが起動してるとか・・・
種類：アドバイス
どんな人：一般人
自信：参考意見
回答日時：08/07/03 11:47
回答番号：No.3
この回答への補足ＶＢＡの知識がほぼ無いのでさっぱりなのですが、
他に使っているといえば、レコードの追加ボタンとレコード消去のボタンぐらいです。

あと、別のファームでクエリを開くマクロを使っていますが関係なさそうですし、これは知識のある方に見てもらわないと解決できないようですね。
この回答へのお礼この回答にお礼をつける(質問者のみ)

回答

 
回答者：Dxak ＃１です

> オーダー順を最後に設定していましたが、
> これが不味かったのでしょうか？

そう言うことでしょうね
タブで、飛んで、次のレコードへ移動すると言う話ね
タブ順列を、もっと前に持って行けば、「カレントレコード内」にしなくて大丈夫だと思いますよ
タブストップ「いいえ」だと、タブでの移動で無視されますし・・・
種類：アドバイス
どんな人：一般人
自信：参考意見
回答日時：08/07/02 18:32
回答番号：No.2
この回答への補足原因が解決されたかと思いましたが、
カレントレコード設定でも起きてしまいました・・・。

サブフォームを使っているのですが、この辺りの影響もあるのでしょうか？

関係ないかもしれませんが、非連結の検索ボックスはオーダー順番を１にしてあります。
この回答へのお礼この回答にお礼をつける(質問者のみ)

回答

 
回答者：Dxak レコード検索で、検索された最初のレコードに移動してるモジュールです

問題は、タブストップ関係
・フォームの「Tabキー移動」を「すべてのレコード」から「カレントレコード」に変更するか？
・タブ移動の順列を変更するか？
・モジュールを、検索を辞めて、抽出に変更するか？

どれか？だろうね
どうしたい？
種類：補足要求
どんな人：一般人
自信：参考意見
回答日時：08/07/02 17:07
回答番号：No.1
この回答へのお礼ありがとうございます。カレントレコードに変更しました。
タブの順番は入力順に設定し、表示のみのボックス（タブストップいいえ）はオーダー順を
最後に設定していましたが、これが不味かったのでしょうか？
 
最新から表示｜回答順に表示｜良回答のみ表示
このページのトップへ