Excel服务器SaveDataAsFile函数作用
2020-03-27 00:10
Excel服务器SaveDataAsFile函数作用:导出某一份符合条件的报表(对应链接导出功能)
       参数作用:导出某一份符合条件的报表(对应链接导出功能)
       参数:参数1 —— 模板的名字
                 参数2 —— 条件字符窜,
格式:字段名称1 = 条件1;字段名称2 = 条件2;… …
                         (如果符合条件的报表数据有多份,则只导出第一份数据)
                       参数3 —— 带路径的Excel文件名字
       返回值:无
 
示例:
       Sub CommandButton1_Click()
                     ‘定义接口变量
           Dim obj As Object 
                     ‘获取E立方管理平台 的编程接口
           Set obj = Application.COMAddIns.Item("prjAddin.Office_Addin").Object
                     ‘通过接口调用SaveDataAsFile
           obj. SaveDataAsFile "销售单", "销售单号='" + ActiveSheet.Cells(4, 2) .text+ "'", "C:\test.xls"
                     ‘释放编程接口
           Set obj = Nothing
End Sub
解说:在工作表上放置了一个按钮,当点击按钮时就调用上面的VBA代码,导出销售单号=单元格(42的数据,另存为Excel文件“C:\test.xls”。:参数1 —— 模板的名字
                 参数2 —— 条件字符窜,
格式:字段名称1 = 条件1;字段名称2 = 条件2;… …
                         (如果符合条件的报表数据有多份,则只导出第一份数据)
                       参数3 —— 带路径的Excel文件名字
       返回值:无
 
示例:
       Sub CommandButton1_Click()
                     ‘定义接口变量
           Dim obj As Object 
                     ‘获取E立方管理平台 的编程接口
           Set obj = Application.COMAddIns.Item("prjAddin.Office_Addin").Object
                     ‘通过接口调用SaveDataAsFile
           obj. SaveDataAsFile "销售单", "销售单号='" + ActiveSheet.Cells(4, 2) .text+ "'", "C:\test.xls"
                     ‘释放编程接口
           Set obj = Nothing
End Sub
解说:在工作表上放置了一个按钮,当点击按钮时就调用上面的VBA代码,导出销售单号=单元格(42的数据,另存为Excel文件“C:\test.xls”。
Copyright © 2017 沈阳凯安信通科技有限公司 All rights reserved. Power by DedeCms 辽ICP备13002452号-5