AccessのVBAでSQLのUPDATE SETを使いフィールド値の更新｜フォーム実行例

値の更新： UPDATE SET

UPDATE テーブル名 SET フィールド名=値
値はフィールドの型に対応しないとエラーになります。
例えば、数値型に文字を代入しようとすることです。
実行前に値のチェックをするか、ON ERRORで対処する必要があります

サンプルソフト
「更新する値」をテキストボックスに入力し、「実行」ボタンをクリックすると、「T_測定」テーブルの全レコードの測定値が入力値に更新されます。
測定値フィールドは長整数型なので、数値を入力する必要があります。
もし文字を入力し実行すると、「実行時エラー '3661'　パラメータが少なすぎます。1を指定ください」のエラーメッセージダイアログが表示されます。

SQL UPDATE 更新

Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    If IsNull(Me!テキスト1) Then
        MsgBox "更新する値を入力してください。"
        Exit Sub
    End If
    SQL = "UPDATE T_測定 SET 測定値=" & Me!テキスト1
    CurrentDb.Execute SQL, dbFailOnError
End Sub

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

Home　

SQL Tips

AccessのVBAでSQLのUPDATE SETを使いフィールド値の更新｜フォーム実行例

値の更新 ： UPDATE SET

値の更新： UPDATE SET