Foxtable(狐表)用户栏目专家坐堂 → excel 报表的字段列名 想按照标题来显示?


  共有2976人关注过本帖树形打印复制链接

主题:excel 报表的字段列名 想按照标题来显示?

帅哥哟,离线,有人找我吗?
jswjyjf
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2552 积分:20057 威望:0 精华:0 注册:2012/5/19 11:57:00
excel 报表的字段列名 想按照标题来显示?  发帖心情 Post By:2015/3/23 11:13:00 [只看该作者]

excel 报表的字段列名 想按照标题来显示 ?为啥对应不起来

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\月统计.xls")
Dim fl As String = ProjectPath & "Reports\月统计.xls"
Dim dt As Table = Tables("统计表1")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For c As Integer = 0 To dt.Cols.Count-1 '添加列标题
Sheet(2, c).Value = dt.Cols(c).caption
Next
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/3/23 11:15:00 [只看该作者]

位置歪了? 那就调整位置啊

 回到顶部
帅哥哟,离线,有人找我吗?
jswjyjf
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2552 积分:20057 威望:0 精华:0 注册:2012/5/19 11:57:00
  发帖心情 Post By:2015/3/23 11:19:00 [只看该作者]

Dim dt As Table = Tables("统计表1")
Dim Sheet As XLS.Sheet = Book.Sheets(0)
For c As Integer = 0 To dt.Cols.Count-1 '添加列标题
Sheet(2, c).Value = dt.Cols(c).caption
Next
这段语句 有没有不合理

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/3/23 11:28:00 [只看该作者]

没有,可以想到的只有位置歪了.

 回到顶部