- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]excel报表（已解决） (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=24905)
-- 发布时间：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
--
不显示和这个代码无关，做个简单一点的例子，连同数据表和模版一起发上来测试。
-- 发布时间：2012/10/26 11:20:00
--
谢谢狐爸老师的回复，现将案例上传，请指教，谢谢！！
（在命令窗口运行一楼的代码）
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
-- 发布时间：2012/10/26 11:39:00
--
楼主，是你的列名写错了，少写了一个 _
[部门_1]
-- 发布时间：2012/10/26 12:00:00
--
谢谢lin_hailun老师的指教，问题解决，再次感谢！！