以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 导出的交叉表能改进吗 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3380)
|
-- 作者:sf951
-- 发布时间:2009/7/1 13:20:00
-- 导出的交叉表能改进吗
生成的交叉表,导出的时候,他的列标题不尽人意,要是和狐表里的列标题一样就好了 此主题相关图片如下:未命名.jpg
|
-- 作者:yangming
-- 发布时间:2009/7/1 13:59:00
--
那就不导出,直接打印表
|
-- 作者:sf951
-- 发布时间:2009/7/1 14:11:00
--
就是需要电子表格的文档了.
|
-- 作者:yangming
-- 发布时间:2009/7/1 14:45:00
--
下面的代码保存的EXCEL后比导出的表更方便改动
Tables("表A").SaveExcel(ProjectPath & "Attachments\\季度表.xls","表A",False) Dim Result As DialogResult Dim Proc As New Process \'打开工作簿 Proc.File = ProjectPath & "Attachments\\季度表.xls" Proc.Start()
|
-- 作者:sf951
-- 发布时间:2009/7/1 15:11:00
--
谢谢!
|
-- 作者:sf951
-- 发布时间:2009/7/1 15:26:00
--
刚才试了一下,完全达到我的设想,谢谢了!
|
-- 作者:狐狸爸爸
-- 发布时间:2009/7/1 15:52:00
--
其实你可以用Excel报表生成,在模板中绘制好表头即可,很简单的
[此贴子已经被作者于2009-7-1 15:52:49编辑过]
|
-- 作者:sf951
-- 发布时间:2009/7/1 17:53:00
--
还是用Tables.SaveExcel来得快些,呵呵
|