Foxtable(狐表)用户栏目专家坐堂 → excel报表合并模式问题


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

主题:excel报表合并模式问题

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/21 9:11:00 [显示全部帖子]

 不应该,默认就是标准合并的你试试加入一句

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\订单.xls") '打开模板
Dim fl As String = ProjectPath & "Reports\订单.xls"
book.MergeFree = false
Book.Build() '生成报表
Book.Save(fl)
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True


 回到顶部