HOME > 即効テクニック > AccessVBA > データ操作 > レコードの複数の項目を更新する

即効テクニック

データ操作

レコードの複数の項目を更新する

(Access)
●概要●
構文 UPDATE テーブル名 
   SETフィールド1 = フィールド1の値, フィールド2 = フィールド2の値,・・・;

UPDATEステートメントを使用してテーブルのレコードを更新します。SET句に「フィールド名 = 値」という式を「,」(カンマ)で区切って複数記述すると、レコード内の複数のフィールドを更新することができます。
UPDATEステートメントでレコードを更新するテーブルが存在しない場合、エラーとなりますが、テーブルが存在していて、更新対象のレコードが存在しない場合はエラーにはなりません。
サンプルでは、「商品テーブル」の「商品名」、「単価」フィールドの値を更新します。

●サンプル●
'レコードの複数の項目を更新する
Public Sub Sample()

    Dim myDB As Database
    Dim mySQL As String

    'SQLステートメントを定義する
    mySQL = "UPDATE 商品テーブル " & _
            "SET 商品名='プレミアム アイスクリーム',単価=200 " & _
            "WHERE 商品コード=1002;"

    'カレントデータベースを変数に代入する
    Set myDB = CurrentDb
    'SQLを実行する
    myDB.Execute mySQL

End Sub