Recordsetでレコードを削除するDeleteメソッド ： Access

レコードを削除するには、Deleteメソッドを使います。

削除するには初めに削除したいレコードに移動させておく必要があります。

削除対象にレコードを移動させるには

Move：指定したレコード数移動

MoveFirst：先頭のレコードに移動

MoveLast：最後のレコードに移動

MoveNext：1つ次のレコードに移動

MovePrevious：1つ前のレコードに移動

を使います。又

FindFirst：検索し最初に見つかったレコードに移動

等を使い検索し削除する方法もよく使います。

■実行前のAccessテーブル

3番目のレコード（製品IDが3のレコードを）削除します

■ Access VBA実行コード

VBAの解説

・製品マスターのレコードセットを宣言
・MoveFirstで先頭レコードへ移動
・Move 2 で2つレコードを移動、これで3番目がカレントレコードになります。
・Deleteで削除します。

Option Compare Database
Option Explicit

Private Sub コマンド0_Click()
    Dim rs As Recordset
    Set rs = CurrentDb.OpenRecordset("M_製品マスター")
    rs.MoveFirst
    rs.Move 2
    rs.Delete
    rs.Close
    Set rs = Nothing

End Sub

■ Access実行画面

製品IDが3のレコードが削除されています