2011-02-01 4 views
0

Ms Access VBAとExcelのヘルプが必要です。私も注文の詳細と顧客の詳細を含め、顧客ごとにExcelファイルを作成する必要がMS Access VBAの別のテーブルの条件を使用してExcelスプレッドシートを作成する

t_Customer

- CustomerID 
- CustomerName 
- CustomerAccnt 

t_Orders

- OrderID 
- Desc 
- PartNo 
- Amount 
- Disc 
- Date 
- CustomerID 

:私は2つのテーブルを持っています。各ファイルは "Transactions for .xls"と呼ばれるべきです。私の考えは、各顧客をループ内の顧客テーブルから取り出し、ordersテーブルの情報と一致させ、一時テーブルを作成し、Excelにエクスポートすることです。

私はこれを行う方法がわかりません。何か助けや助言をいただければ幸いです。

答えて

3

あなたは正しい行にあります。私はこのようなことをするでしょう(プレストコードですが、うまくいくはずです)

Dim Db as DAO.Database 
Dim Rst as DAO.Recordset 

Set Rst = Db.OpenRecordset ("SELECT Customer_ID, Customer_name FROM t_Customer") 
With Rst 
    Do Until .Eof 
     Db.CreateQueryDef "qryTemp_query", _ 
      "SELECT blah FROM t_Order WHERE Customer_ID=" & !Customer_ID.Value 
     DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, _ 
      "qryTemp_query", "C:\Transactions for " & !Customer_name.Value 
     Db.QueryDefs.Delete "qryTemp_query" 
     .MoveNext 
    Loop 
End With 
Rst.Close 
Db.Close 
+0

ありがとうございました。 – user594082

+0

@ User594082この回答には受け入れられたものとみなしてください。この回答の左上にある上下の矢印の下にある小さなチェックマークをクリックします。 – ErikE

関連する問題