AccessのVBAでSQLのDELETEを使いテーブルから条件に合うデータを削除する｜フォーム実行例

条件に合うレコードを削除： DELETE FROM WHERE

DELETE FROM 削除テーブル名 WHERE 条件
WHEREで条件に合うデータのみが削除されます。
例： SQL = "DELETE FROM T_顧客 WHERE 年齢=20"
20才の顧客が削除されます。

サンプルソフト
「削除する名刺ID」に削除したい名刺ID（数値）を入力し、「削除」ボタンをクリックすると、該当する名刺IDのレコードを削除します。
入力した「名刺ID」が見つからない場合は、エラー等も出ず何も起こりません。
名刺IDを入力します。

［実行前のT_名刺管理テーブル］
名刺、苗字　削除前

［実行後のT_名刺管理テーブル］
IDが12のデータがなくなっています。
名刺、苗字　削除後

［コード］
Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    If IsNull(Me!テキスト1) Then
        MsgBox "削除する名刺IDを入力してください。"
        Exit Sub
    End If
    SQL = "DELETE FROM T_名刺管理 WHERE 名刺ID=" & Me!テキスト1
    CurrentDb.Execute SQL, dbFailOnError
End Sub

サンプルソフトのダウンロード

Home　

SQL Tips

AccessのVBAでSQLのDELETEを使いテーブルから条件に合うデータを削除する｜フォーム実行例

条件に合うレコードを削除 ： DELETE FROM WHERE

条件に合うレコードを削除： DELETE FROM WHERE