ADO_レコードの検索
レコードの検索にはrs.Findメソッドを使います。指定された条件を満たす行を Recordset で検索します。条件が満たされている場合、 現在の行位置は見つかったレコードに設定されます。
使用例
次は「T_名簿」のレコードセットから住所が「東京から始まる」レコードを検索し「氏名」と「住所」を書き出してゆくものです。
Sub sample4()
Dim cn As ADODB.Connection
Dim rs As New ADODB.Recordset
Set cn = CurrentProject.Connection
rs.Open "T_名簿", cn, adOpenStatic, adLockReadOnly
Do
rs.Find "住所 Like '東京都*'"
If Not rs.EOF Then
Debug.Print rs("氏名"), rs("住所")
rs.MoveNext
Else
Exit Do
End If
Loop
Set rs = Nothing
Set cn = Nothing
End Sub
結果
（元のテーブル）
（検索結果）
（この項終わり）