以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]统计表如何导出到Excel文档  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90380)

--  作者:joe_xgp
--  发布时间:2016/9/11 15:55:00
--  [求助]统计表如何导出到Excel文档

各位老师好,

 

自己建立的表可以通过建立模板选择需要列,导出到Excel。请问通过统计得到的统计表,如何导出的Excel?或者在哪里可以看到例子,请老师指教,非常感激!

 

 


--  作者:sloyy
--  发布时间:2016/9/11 22:52:00
--  
很简单,通过统计的表也有个表名的呀

Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog 
dlg
.Filter"Excel文件|*.xls" \'设置筛选器
If
 dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
     Tables("统计表").SaveExcel(dlg.FileName, "统计表")  
\'保存文件

End
 If

--  作者:有点蓝
--  发布时间:2016/9/12 8:39:00
--  
1、2楼方法
2、如果用模板,把统计表和正常表一样做模板设计即可

--  作者:地瓜
--  发布时间:2016/12/21 11:02:00
--  
按照2楼的方法在导出时能自动打开的吗?谢谢!
--  作者:地瓜
--  发布时间:2016/12/21 11:17:00
--  
查看了原来的使用模板导出功能时使用的打开方法.
Dim Proc As New Process 
Proc.File=dlg.FileName
Proc.Start()
就可以在保存完毕时自动打开了。


--  作者:有点色
--  发布时间:2016/12/21 11:20:00
--  
以下是引用地瓜在2016/12/21 11:02:00的发言:
按照2楼的方法在导出时能自动打开的吗?谢谢!

 

加上打开的代码

 

http://www.foxtable.com/webhelp/scr/0353.htm