Access VBA 入門講座

Homeレコードの削除レコードの削除 Delete

データベースのテーブルからレコードを削除するにはDeleteメソッドを使用します。


レコードセット変数.Delete
						

Deleteメソッドを使用する場合、Openメソッドでレコードセットを作成する際に引数としてadLockOptimisticを指定して更新用にレコードセットを作成する必要があります。

以下の例では名簿テーブルよりOpenメソッドにより更新用にレコードセットを作成して、Deleteメソッドにより新規にレコードを作成し姓が"武田"であるレコードを削除し、Closeメソッドで閉じています。


Sub Sample()

    Dim rs As New ADODB.Recordset

    rs.Open "名簿", CurrentProject.Connection,,adLockOptimistic

    rs.Find "姓='武田'", adSearchForward

    Do While rs!姓 = "武田"

        rs.Delete

        rs.MoveNext

    Loop

    rs.Close

End Sub