在线学习
About Us

在线文档

首页 >>在线学习 >>在线文档

NewReportVBA接口函数


newReport(<报表名称>,<是否关闭已打开的报表>)

<报表名称>:字符串,为要新填的报表名称

<是否关闭已打开的报表>:布尔型,Ture,关闭已打开的报表, False不关闭已打开的报表。默认是False。

功能:新填指定名称的报表示例,等同于在我的工作台中选中名称后,按[新建]


应用场合:

1.填报过程中发现缺少基础数据,需要即时补充。(可利用按钮的click事件,或worksheet的doubleClick事件)
2.希望一张表单保存后自动开始填报某种特定种类的表单。(可写在workbook_beforeSave事件处理程序中)
 

应用举例:

1.打开示例数据库中的“订单”模板。
2.增加一个按钮,修改其属性:caption为“增添新客户”,name为“cmdNewCust”




3.打开vba编辑器,修改按钮的click事件处理程序:
Private Sub cmdNewCust_Click()
Dim oAdd As Object
Set oAdd = Application.COMAddIns("ESClient.Connect").Object

oAdd.newReport ("客户登记表"),False
Set oAdd = Nothing
End Sub
 

4.保存模板。
尝试填报一张订单,当从客户名称树中找不到想要的客户名称时,可以点击此按钮,填报一个新的客户登记表。
 

Excel服务器学习和下载

http://www.qinzhe.com

http://www1.qinzhe.com

http://www3.qinzhe.com