代码之家 › 专栏 › 技术社区 › Kyra

如何在MS Access 97中以编程方式访问报表工具栏

export ms-access excel

Kyra · 技术社区 · 14 年前

我在Access97中有一个项目,必须添加将报表导出到Excel的功能。当您在程序中运行报表时,已经能够通过Excel导出到Word和Excel,但只有部分头文件。

通过研究,我发现我可能可以使用outputto让它工作,但很不幸,我不能尝试这样做,因为我在报告视图中找不到工具栏的代码。我找到了实际的报告。我从来没有使用过任何版本的访问权限,所以我只需要添加一个宏,还是必须以不同的方式来处理这个问题?我找不到代码的位置。

1 回复 | 直到 14 年前

Beth 14 年前

将宏与TransferSpreadsheet操作一起使用,或使用以下VBA代码导出宏:

    DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, sQryExport, sPath & "\xls\" & sPrefix & sRptGroup & ".xls"

    DoCmd.OpenReport "rpt_summary", acViewPreview, , "reportGroupID='" & sRptGroup & "'", acHidden
    DoCmd.OutputTo acOutputReport, "rpt_summary", "Rich Text Format (*.rtf)", sPath & "\rtf\" & sPrefix & sRptGroup & ".rtf"
    DoCmd.Close acReport, "rpt_summary"

推荐文章