アクセス：クエリの結果をVBAテーブルにコピー

Question

私はテーブルに自分のクエリの結果をコピーしたいと思います。

私はこの試みた：

Function queryintotable() 

Dim rs As New ADODB.Recordset 

DoCmd.SetWarnings False 

rs.CursorLocation = adUseClient  
rs.Open "target_table", CurrentProject.Connection 
rs.Sort = "Retail_ID ASC" 

Do Until rs.EOF = True 
    DoCmd.CopyObject , "myquery", acQuery, "target_table"  
    rs.MoveNext 
Loop 

rs.Close 

DoCmd.SetWarnings True 
MsgBox ("Finish! " & Time) 

End Function 

をしかし、私は何かを忘れてしまったと思います。ありがとうございました！コードの

Answer 1

一行：

CurrentDB.Execute "Select myquery.* Into target_table From myquery" 

はmyqueryの結果セットを含むtarget_tableという名前のテーブルを作成します。

CurrentDB.Execute "Insert Into target_table Select myquery.* From myquery" 

同じ構造で、target_tableという名前の既存のテーブルにmyqueryの結果セットを挿入します。