【Access VBA】rs.Editの使い方｜Updateとの違いを解説

Access VBAでテーブルデータを更新する際に使うのが、rs.Editです。

ただ、初心者だと、

と疑問を持つことが多いです。

Access VBAでは、Recordsetを使ったデータ更新処理が非常によく使われます。

その中でも、rs.Editはレコード編集の開始を行う重要な命令です。

この記事では、rs.Editの使い方とUpdateとの違いを解説初心者向けにわかりやすく解説します。

rs.Editとは？

rs.Editは、「これからレコードを編集します」とAccessへ伝えるための命令です。

主にDAO.Recordsetで既存データを更新するときに使用します。

あわせて読みたい

【Access VBA】レコードセットを使う方法｜実務で使う基本処理まとめ Access VBAを勉強していると、DAO.Recordsetというコードが出てきます。 初心者だと、 レコードセットって何？ 何に使うの？ テーブルと何が違う？ と混乱しやすい部分…

基本構文はこちらです。

rs.Edit

ただし、Editだけではデータは保存されません。

実際には次の流れで使います。

Access VBAでは非常に基本となるレコード更新処理です。

rs.Editの基本的な使い方

実際のコードを見てみましょう。

Dim db As DAO.Database
Dim rs As DAO.Recordset

Set db = CurrentDb
Set rs = db.OpenRecordset("T_社員")

rs.MoveFirst
rs.Edit

rs!社員名 = "田中"
rs!部署 = "営業"

rs.Update
rs.Close

Set rs = Nothing
Set db = Nothing

コード全体の目的

テーブル「T_社員」の先頭レコードを更新するコードです。

社員名と部署を変更しています。

コード解説

Dim db As DAO.Database
Dim rs As DAO.Recordset

データベース操作用の変数と、レコード操作用のRecordset変数を定義しています。

Set db = CurrentDb

現在開いているAccessデータベースを取得しています。

あわせて読みたい

【Access VBA】CurrentDbとは？使い方を初心者向けに解説 Access VBAを勉強していると、CurrentDbというコードがよく出てきます。 初心者だと、 CurrentDbって何？ なぜ必要なの？ どんな場面で使うの？ と疑問に感じやすい部分…

Set rs = db.OpenRecordset("T_社員")

テーブル「T_社員」を開いています。

rs.MoveFirst

先頭レコードへ移動しています。

rs.Edit

レコードを編集可能な状態にしています。

rs!社員名 = "田中"
rs!部署 = "営業"

社員名と部署を更新しています。

rs.Update

変更内容を保存しています。

rs.EditとUpdateの違い

初心者がかなり混乱しやすいのが、EditとUpdateの違いです。

つまり、次のような流れになります。

という流れになります。

イメージとしては、

• Edit → 編集モードに入る
• Update → 保存ボタンを押す

に近いです。

この順番を間違えるとエラーになるため注意してください。

また、新規追加の場合は、rs.AddNewを使用します。

あわせて読みたい

【Access VBA】データ追加入門｜AddNewとINSERT INTOの使い方 顧客データ登録 売上データ保存 CSV取込 フォーム入力保存 Access VBAではデータ追加処理を行う場面が非常に多いです。 ただ初心者だと、 どうやって追加するの？ AddNe…

rs.Editでよくあるエラーと注意点

Editを書かずに更新する

次のコードはエラーになります。

rs!社員名 = "田中"
rs.Update

これはEditを書いていないためです。

Access VBAでは、Edit → 値変更 → Updateの順番が必要です。

Updateを忘れる

初心者がかなりやりがちなミスです。

rs.Edit
rs!社員名 = "田中"

この場合、変更内容は保存されません。

必ず最後に、rs.Updateが必要です。

レコードが存在しない

Recordsetにデータが存在しない状態で、rs.MoveFirstを実行するとエラーになります。

実務では次のようなチェックを行うことが多いです。

If rs.EOF = False Then
   rs.Edit
   rs!社員名 = "田中"
   rs.Update
End If

EOFは、「レコードが存在しない状態」を判定するプロパティです。

業務システムでは非常によく使います。

あわせて読みたい

Access VBAのIf文入門｜Else・ElseIfの使い方も解説 Access VBAを学び始めると、 条件によって処理を変えたい 未入力ならエラー表示したい 入力値によって保存内容を変更したい という場面が必ず出てきます。 そこで使うの…

更新できないクエリを開いている

クエリによっては更新不可になる場合があります。

例えば、

• 集計クエリ
• DISTINCTを使ったクエリ
• 複雑な結合クエリ

などは編集できないケースがあります。

実務での活用ポイント

rs.Editは業務システム開発で非常によく使います。

例えば、一括更新処理では次のようなコードをよく使います。

Do While Not rs.EOF
   rs.Edit
   rs!状態 = "完了"
   rs.Update
   rs.MoveNext
Loop

このコードは、全レコードの状態を「完了」に変更しています。

実務ではこのようなループ更新処理がかなり多いです。

ただし、大量データ更新では処理速度が遅くなることがあります。

その場合は、UPDATEクエリを使ったほうが高速になるケースもあります。

あわせて読みたい

【Access VBA】Do WhileとDo Untilの違いと使い方 Access VBAを勉強していると、Do WhileDo Untilという繰り返し処理が出てきます。 ただ初心者だと、 何が違うの？ どっちを使えばいい？ For文とどう違う？ と混乱しや…

まとめ

rs.Editは、「これからレコードを編集する」ことをAccessへ伝える命令です。

基本的には、

の流れで覚えると理解しやすいです。

まずは小さなテーブルで実際に試しながら覚えていくのがおすすめです。