データベースのテーブルから特定の条件のレコードを追加するにはAddNewメソッドとUpdateメソッドを使用します。
レコードセット変数.AddNew
レコードセット変数!フィールド名=値
レコードセット変数.Update
AddNewメソッドを使用する場合、Openメソッドでレコードセットを作成する際に引数としてadLockOptimisticを指定して更新用にレコードセットを作成する必要があります。
以下の例では名簿テーブルよりOpenメソッドにより更新用にレコードセットを作成して、AddNewメソッドにより新規にレコードを作成しそのレコードに"武田"を追加しUpdateメッソドにて更新、Closeメソッドで閉じています。
Sub Sample()
Dim rs As New ADODB.Recordset
rs.Open "名簿", CurrentProject.Connection,,adLockOptimistic
rs.AddNew
rs!姓 ="武田"
rs.Update
rs.Close
End Sub
ADOとは | レコードセットの作成(Open) | レコードセットの読み取り(Move) | レコードの検索(Find) | レコードの更新(Update) | レコードセットの追加 | レコードの削除(Delete) | レコードの抽出(Filter) | レコードの並び替え(Sort) | SQL文の実行