Microsoft Access 掲示板

ACCESSのVBAについて、ひとつのテキストボックスで複数フィールドの検索をしたい / 1

5 コメント
views
4 フォロー
1

Rst.MoveFirst⇒ここの部分で、カレントレコードがありませんとなります。

フォームにレコードは表示されてますか。レコード件数が0だとそのエラーになりますが。

下記のようにしてみては。

If Rst.EOF Then
    MsgBox "レコードがありません。"
    Exit Sub
Else
    Rst.MoveFirst
End If
通報 ...