AccessSQL SELECTの結果をINSERTするSQL構文

備忘録記事です。

MicrosoftAccessのSQL構文書き方。「追加クエリ」つまり「INSERT」構文で「SELECT」した結果を元にINSERTする構文の書き方です。

追記先テーブル名: Table1にカラム1、カラム2、カラム3
参照元テーブル名: Table2にカラムA、カラムB、カラムC
カラムAの値が5のレコードを選択して追加する場合の構文

Dim pStrSQL As String

pStrSQL="INSERT INTO Table1 (カラム1,カラム2,カラム3) "
pStrSQL=pStrSQL & "SELECT カラムA,カラムB,カラムC " 
pStrSQL=pSstSQL & "FROM Table2 WHERE カラムA=5;"