共4 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[求助]导出 EXCEL（已解决）
1楼
易服 发表于：2009/7/4 9:40:00导出零时表"交叉统计"
此主题相关图片如下：打开.png
此主题相关图片如下：导出.gif
Dim ex as New Exporter
ex.SourceTableName = "交叉统计" '指定导出表
ex.FilePath = "e:\报表\分析.xls" '指定目标文件
ex.Format = "Excel" '导出格式为Excel
ex.Export() '开始导出
[此贴子已经被作者于2009-7-4 11:13:03编辑过]
2楼
易服 发表于：2009/7/4 10:51:00请狐爸看看
3楼
易服 发表于：2009/7/4 11:09:00参照http://www.foxtable.com/dispbbs.asp?boardid=2&Id=3380&page=3
Tables("交叉统计").SaveExcel(ProjectPath & "Attachments\分析.xls","交叉统计",False)
Dim Result As DialogResult
Dim Proc As New Process '打开工作簿
Proc.File = ProjectPath & "Attachments\分析.xls"
Proc.Start()
Tables("交叉统计").SaveExcel(ProjectPath & "Attachments\分析.xls","交叉统计",False)
Dim Result As DialogResult
Dim Proc As New Process '打开工作簿
Proc.File = ProjectPath & "Attachments\分析.xls"
Proc.Start()
[此贴子已经被作者于2009-7-4 11:11:07编辑过]
4楼
狐狸爸爸 发表于：2009/7/4 11:17:00呵呵，还好，刚刚下载，我还没有看。
共4 条记录, 每页显示 10 条, 页签:
[1]