从VBA运行并打印Crystal报表

问题描述 投票:0回答:3

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

我已经安装了Crystal Reports XI Developer,并且可以运行.rpt文件(某些需要参数)并运行并发送给打印机,而无需任何用户干预。

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

任何能帮助我入门的指针都将不胜感激。

谢谢马丁

vba crystal-reports excel-vba crystal-reports-xi excel
3个回答
3
投票

好,我解决了我的问题。

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

这里有一些示例代码:

昏暗的CR作为新的CRAXDRT.ApplicationDim rep as CRAXDRT.Report设置rep = CR.OpenReport(Range(“ CRpath”))rep.ParameterFields(1).AddCurrentValue“波士顿”rep.ParameterFields(2).AddCurrentValue“汽车”rep.Database.Tables(1).ConnectionProperties(“ Password”)。Value =“ pw12345”rep.ReadRecordsrep.PrintOut hintUser:= False,numberOfCopy:= 1'hintUser:= True不起作用

1
投票

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

[它从2002年开始问世,开发人员一直在根据客户要求向其不断添加自定义功能,因此它遭受了“功能蠕变”的困扰。但是,该手册(可从网站上免费下载)在保持所有观点方面做得很好。另外,如果您获得维护协议,则开发人员会非常积极地响应。就我而言,他通常会在一天之内回复我的电话。

* (这不是开发人员在谈论,只是一个满意的客户)


0
投票

我完全复制了您的代码,但是在Set Rep = CR.OpenReport(rptName)行上,代码只是停止了-甚至没有转到我的错误处理程序!

我再次检查了该文件是否存在,并且拼写正确,但仍然没有运气。

关于查找错误的任何建议?停止运行会使调试变得有些困难!

© www.soinside.com 2019 - 2024. All rights reserved.