No.3ベストアンサー
- 回答日時:
本当にいろいろな方法があります。
一番簡単なのは、
あらかじめ「追加クエリ」を作成しておき
Docmd.OpenQuery "追加クエリ名"
あるいは DAO で
Set dbs = CurrentDB
dbs.Excute "追加クエリ名"
追加クエリを使用しない場合は
追加クエリの SQL文 に相当するSQL を 実行。
strSQL="INSERT INTO 商品登録データ SELECT 一時商品登録データ.* FROM 一時商品登録データ"
Docmd.RunSQL strSQL
あるいは DAO で
Set dbs = CurrentDB
dbs.Excute strSQL
とか。
直書き、間違いがあったら御免。
まさに、自分が知りたかったSQL構文でした
追加クエリーを作成するとはいいアイデアですね
活用させてもらいます
ありがとうございました
No.2
- 回答日時:
Do Until rs2.EOF
の前に
rs2.MoveFirst
を追加して、
rs2.MoveFirst
Do Until rs2.EOF
としてください。
No.1
- 回答日時:
方法はいろいろですが、以下のような方法があります。
テーブルのフィールド名を商品名、価格とします。
DAOを使っているのでコード表のツール、参照設定
からDAOの一番高いバージョンを選択してください。
Private Sub コマンド0_Click()
Dim db As Database
Dim rs1 As Recordset
Dim rs2 As Recordset
If MsgBox("データを転送していいですか?", vbYesNo) = vbYes Then
Set db = CurrentDb
Set rs1 = db.OpenRecordset("商品登録データ", dbOpenDynaset)
Set rs2 = db.OpenRecordset("一時商品登録データ", dbOpenDynaset)
Do Until rs2.EOF
rs1.AddNew
rs1!商品名 = rs2!商品名
rs1!価格 = rs2!価格
rs1.Update
rs2.MoveNext
Loop
rs1.Close: Set rs1 = Nothing
rs2.Close: Set rs2 = Nothing
db.Close: Set db = Nothing
End If
End Sub
なお、フィールド名が増加する場合は、
rs1.AddNew
rs1!商品名 = rs2!商品名
rs!価格 = rs2!価格
rs1.Update
のところに、フィールド名を追加してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(データベース) pythonでsqlight勉強中、クエリー結果の利用法教えて下さい 1 2022/04/28 20:38
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Oracle 質問です。 下記のテーブルとデータがあり、 取得想定結果のように出力したいです。 下記のsqlだと0 2 2023/05/23 19:10
- SQL Server DBのテーブルの設計ができず困っています。 2 2023/06/29 16:43
- Ruby pandasでsqlite3にテーブル作成・追加・読み出しでindexの取り扱い方教えてください 5 2023/03/08 09:57
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- Excel(エクセル) 【vba】日付の形式が勝手に変わってしまう。 1 2022/09/29 10:54
- その他(データベース) c言語の問題です。これを踏まえてコーディングしたいのでおしえていただきたいです。 3 2023/08/03 09:27
- Windows 7 エクセルで重複データから抽出したい 2 2022/05/18 23:31
- Access(アクセス) access フォーム 大分類、小分類 1 2022/08/11 18:03
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
Accessでレコードを別テーブルへコピーするには
Access(アクセス)
-
Accessでテーブルからテーブルにデータをコピーしたい
その他(データベース)
-
SQL文で パラメータが少なすぎます エラー
Access(アクセス)
-
-
4
Access サブフォームでの選択行の取得
その他(データベース)
-
5
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
6
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
7
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
8
他のMDBのテーブルに追加したい
その他(プログラミング・Web制作)
-
9
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
10
Accessで別mdbのテーブルをコピー
その他(プログラミング・Web制作)
-
11
VBAで変数内に保持された二次配列データをテーブルに格納
Access(アクセス)
-
12
AccessVBAで作成したExcelファイルを削除する方法は?
Visual Basic(VBA)
-
13
「RunSQL」と「Execute」の違い
Access(アクセス)
-
14
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
-
15
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
16
アクセスVBAのMe!と[ ]
Access(アクセス)
-
17
access vbaにてテンポラリーテーブルが作りたいです。
Access(アクセス)
-
18
insertを高速化させたい
その他(データベース)
-
19
どこにもフォーカスを当てたくない
Access(アクセス)
-
20
アクセス VBAについて FROM句の構文エラー
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessでデータシートに同じデ...
-
住所のDBテーブル、マスターの...
-
ビューのソートについて
-
ERROR1062:Duplicate entry.......
-
accessでレコード更新直後の反...
-
テーブルで一番古いレコードだ...
-
Accessのテーブルデータを一気...
-
access2000 オートナンバーで...
-
Accessの処理速度を速めるため...
-
MS Accessを共有した際にファイ...
-
アクセス レコードセットを更...
-
このISAMでは、リンクテーブル・・
-
Oracleで上書きImportはできま...
-
MySQL、Accessを利用したDBの設計
-
htmlコードで書かれた表にphpで...
-
アクセスで日付計算
-
MysqlまたはPostgreSQLで、デー...
-
リレーションシップについて
-
重複なしのフィールドにつき、...
-
SQL、2つのテーブルで条件一致...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Accessでデータシートに同じデ...
-
Accessのテーブルデータを一気...
-
テーブルで一番古いレコードだ...
-
ビューのソートについて
-
Oracleで上書きImportはできま...
-
accessでレコード更新直後の反...
-
このISAMでは、リンクテーブル・・
-
マテリアライズドビューとスナ...
-
アクセス レコードセットを更...
-
同一テーブルのデータを参照し...
-
htmlコードで書かれた表にphpで...
-
結合テーブルでINSERTする方法...
-
ACCESSで容量が50MBになった...
-
ERROR1062:Duplicate entry.......
-
Accessでの稼働日数計算の方法
-
削除したテーブルを元に戻すこ...
-
重複クエリを使ったデータ削除
-
Accessのインポートについて(上...
-
処理の途中で停止させ、再開さ...
-
住所のDBテーブル、マスターの...
おすすめ情報