以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么在窗口中实现用按键生成设计好的EXCLE模板报表?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=131269)

--  作者:18504175995
--  发布时间:2019/2/21 18:47:00
--  怎么在窗口中实现用按键生成设计好的EXCLE模板报表?
老师您好,我想设计个主窗口,界面中含table,然后想在窗口中设计个下拉按钮,可以选取基于这个table设计好的EXCLE模板,
选取后自动生成模板格式报表,菜单中可以设计EXCLE下拉列表实现,可是窗口中怎么实现呢?

--  作者:有点蓝
--  发布时间:2019/2/21 20:21:00
--  
下拉可以使用组合框,模板名称作为下拉列表即可


--  作者:18504175995
--  发布时间:2019/2/22 13:12:00
--  
感谢有点蓝老师
--  作者:18504175995
--  发布时间:2019/2/22 13:42:00
--  
有点蓝老师,我发现了一个问题,我用模板建立的表格后缀都是.xlsx格式的,而帮助中只能定义和打开New XLS.Book,否则打开提示非法文件,这个有没有办法来解决?


--  作者:有点蓝
--  发布时间:2019/2/22 14:02:00
--  
Dim Book As New XLS.Book("e:\\问题\\test.xlsx")


--  作者:18504175995
--  发布时间:2019/2/23 9:55:00
--  
之前这么改过了,点击时提示“非法Excel OpenXml文件(*.xlsx)。”
Dim Book As New XLS.Book(ProjectPath & "D:\\软件开发\\易通宝\\Attachments\\前段车队账单汇总.xlsx")
MessageBox.show(1)
Dim fl As String = ProjectPath & "Reports\\前段车队账单汇总.xlsx"
MessageBox.show(2)
Book.Build() 
Book.Save(fl) 
Dim Proc As New Process 
Proc.File = fl
Proc.Start()

--  作者:有点蓝
--  发布时间:2019/2/23 10:12:00
--  
Dim Book As New XLS.Book(ProjectPath & "Attachments\\前段车队账单汇总.xlsx")