从 VBA 运行和打印 Crystal Report答案

【问题标题】：Run and Print Crystal Report from VBA从 VBA 运行和打印 Crystal Report
【发布时间】：2020-05-01 00:41:40
【问题描述】：

我想从 VB/VBA 自动打印 CR 报告。

我安装了 Crystal Reports XI Developer，并运行 .rpt 文件（一些需要参数）并将其发送到打印机，无需任何用户干预。

现在，我坚持第一步，添加正确的库。大概有大约 50 个以 Crystal Reports 或 Business Objects 开头的库，我不知道我需要哪些。

任何让我入门的指针将不胜感激。

谢谢马丁

【问题讨论】：

当您说 VB/VBA 时，您可以使用 VB.Net 解决方案吗？如果是这样，我有一些代码可以在后台将您的 Crystal Report 导出为 PDF 文件，然后将该文件直接发送到默认打印机（无需用户交互）。
不幸的是，我坚持使用 VB6/VBA。也许你仍然可以发布你的解决方案 - 现在它不是关于细节的，更多的是我似乎无法找到一个起点，而 VB.NET 解决方案可能足以让我开始。

标签： vba crystal-reports excel crystal-reports-xi

【解决方案1】：

好的，我解决了我的问题。

CRAXDRT.dll aka Crystal Reports ActiveX Designer 运行时库 是正确的库。

这里是一些示例代码：

将 CR 调暗为新的 CRAXDRT.Application Dim rep As CRAXDRT.Report 设置 rep = CR.OpenReport(Range("CRpath")) rep.ParameterFields(1).AddCurrentValue "波士顿" rep.ParameterFields(2).AddCurrentValue "汽车" rep.Database.Tables(1).ConnectionProperties("密码").Value = "pw12345" 代表阅读记录 rep.PrintOut promptUser:=False, numberOfCopy:=1 ' promptUser:=True 不起作用

【讨论】：

【解决方案2】：

这取决于您的预算，但我推荐一个名为 Visual Cut (http://www.milletsoftware.com/Visual_CUT.htm) 的第三方程序。使用命令行或内置 GUI，您几乎可以以任何您想要的方式处理 Crystal Report 文件，包括 PDF、电子邮件，甚至直接打印到打印机。因此，您可以根据需要完全跳过 VBA。

它自 2002 年以来一直存在，开发人员一直根据客户的要求不断为其添加自定义功能，因此它受到了“功能蠕变”的影响。但是，该手册（可从网站免费下载）很好地保持了所有内容的正确性。此外，如果您获得维护协议，开发人员会非常响应。就我而言，他通常会在一天之内回复我的电话。

*（这不是开发人员在说，只是一个满意的客户）

【讨论】：