以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何实际选选择多种表格模板后,导出相应的报表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=143533)

--  作者:lyl15977511915
--  发布时间:2019/11/27 21:29:00
--  如何实际选选择多种表格模板后,导出相应的报表
麻烦给个编程例子参考
图片点击可在新窗口打开查看此主题相关图片如下:各类表格选择.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/11/27 22:07:00
--  
遍历选中的节点参考:http://www.foxtable.com/webhelp/topics/2302.htm


For Each nd As WinForm.TreeNode In e.Node.AllNodes
  if  
nd.Checked and nd.nodes.count = 0 then
Dim Book As New XLS.Book(ProjectPath & "Attachments\\" & nd.text & ".xls")
Dim 
fl As String = ProjectPath & "Reports\\" & nd.text & ".xls"
Book.Build() \'生成细节区
Book.Save(fl) 
\'保存工作簿
endif
Next