使用MS Access VBA中另一个表中的条件创buildExcel电子表格
Access Access VBA和Excel需要一些帮助。 我有两个表格：
t_Customer
- CustomerID - CustomerName - CustomerAccnt t_Orders
- OrderID - Desc - PartNo - Amount - Disc - Date - CustomerID
我需要为每个客户创buildExcel文件，包括订单详细信息和客户详细信息。 每个文件都应该被称为“事务处理.xls”我的想法是从循环中的客户表中获取每个客户，匹配来自订单表的信息，创build一个临时表，并导出到Excel。
我不知道如何做到这一点，任何帮助或build议将不胜感激。
你在正确的路线上。 我会做这样的事情（presto代码，但应该工作）
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