RecordSet

取得

　テーブルから

Dim rs As Recordset: Set rs = データベース.OpenRecordset("テーブル", Type:=dbOpenTable)

　Type

　　テーブル専用

dbOpenTable

データを編集できる

　　データを編集する

dbOpenDynaset

　　読み取り専用

dbOpenSnapshot

　　　前方スクロールのみ

dbOpenForwardOnly

値の更新

rs.Edit
rs!列.Value = 値
rs.Update

ループ

Do Until rs.EOF
    処理
    rs.MoveNext
Loop