excel - 如何将多个表导出到具有 Microsoft 访问权限的 Excel 电子表格

Question

我有 2 个表可以访问，数据必须从中导出到电子表格。这是否可以使用“DoCmd.TransferSpreadsheet”查询来执行？下面给出代码供参考。

Call CreatePieChart("julydupscores", "julyapvscores", "C:\Performance Database\graph123.xlsm")

'FUNCTION

Public Sub CreatePieChart(sSource As String, qSource As String, msFileName As String)
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, sSource, msFileName, False

我如何也可以传输 qsource（第二个来源）？

Answer 1

我如何也可以传输 qsource（第二个来源）？

不知道你做了什么“魔法” graph123.xlsm，不可能肯定地说，但一般来说，你只需添加第二条指定为源的DoCmd.TransferSpreadsheet语句。qSource导出到 Excel（至少是最新版本）时，如果您指定相同的 Excel 文件名，则第二个表将作为现有 Excel 文档的另一个选项卡添加。（如果您希望它们位于单独的文件中，请指定不同的 Excel 文件名。）