Accessのモジュールで、テーブルにレコードを追加する。～パソコンの小技・備忘録

Accessのモジュールで、テーブルにレコードを追加する。

Accessのモジュールで、テーブルにレコードを追加する方法です。

追加クエリでもできますが、モジュールの方がより複雑な条件設定や変換ができます。

Private Sub InsertRecord() 　　'この方法を使うためには、DAOの参照設定をする　　'必要があります。　　'変数などを定義します。　　Dim strSQL As String 'SQL文格納用　　Dim daoDB As DAO.Database 　　'データベースを現在のMDBファイルに設定します。　　Set daoDB = CurrentDb 　　'追加用のSQL文を作成します。　　'「テスト」というテーブルに追加　　strSQL = "INSERT INTO テスト " & _ 　　　　　　"(氏名 " & _ 　　　　　　" ,住所) " & _ 　　　　　　"VALUES ('田中' " & _ 　　　　　　" ,'東京都') " 　　'作成したSQL文を実行します。　　daoDB.Execute strSQL 　　'データベースを解放します。　　Set daoDB = Nothing End Sub

以上の記述で、レコードを追加することができます。

いろいろな変換を加えた後にレコードを追加、といったこともできますので、いろいろ試してみてください。

パソコンの小技・備忘録

Accessのモジュールで、テーブルにレコードを追加する。

トップページに戻る

サイト内検索

小技カテゴリー

カウンタ

メール送信