以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]excel报表(已解决)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24905)

--  作者:yyzlxc
--  发布时间:2012/10/26 10:18:00
--  [求助]excel报表(已解决)

做了一个excel的模版,要求部分数据竖排,执行下面的代码后,部分数据不能显示,应该如何解决,请各位老师指教,谢谢!!

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\\个人奖金基本资料清单.xls")
Dim fl As String = ProjectPath & "Reports\\个人奖金基本资料清单.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
With Sheet.PrintSetting
    \'在页脚右边打印页号和总页数
    .Footer = "&R第&P页,总&N页"
End With
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()

 

模版视图:

 


图片点击可在新窗口打开查看此主题相关图片如下:o.jpg
图片点击可在新窗口打开查看

生成的表视图:

 

 


图片点击可在新窗口打开查看此主题相关图片如下:p.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2012-10-26 12:01:36编辑过]

--  作者:狐狸爸爸
--  发布时间:2012/10/26 10:32:00
--  

不显示和这个代码无关,做个简单一点的例子,连同数据表和模版一起发上来测试。


--  作者:yyzlxc
--  发布时间:2012/10/26 11:20:00
--  

谢谢狐爸老师的回复,现将案例上传,请指教,谢谢!!

 

 (在命令窗口运行一楼的代码)

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


--  作者:lin_hailun
--  发布时间:2012/10/26 11:39:00
--  
 楼主,是你的列名写错了,少写了一个 _

 [部门_1]

--  作者:yyzlxc
--  发布时间:2012/10/26 12:00:00
--  
谢谢lin_hailun老师的指教,问题解决,再次感谢!!