Foxtable(狐表)用户栏目专家坐堂 → excel单元格自动换行显示不全


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

主题:excel单元格自动换行显示不全

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


加好友 发短信
等级:小狐 帖子:358 积分:4035 威望:0 精华:0 注册:2014/7/29 23:42:00
excel单元格自动换行显示不全  发帖心情 Post By:2015/9/16 19:09:00 [显示全部帖子]

Excel单元格中已经自动换行了,但是显示的内容不完整,大多数是显示了一半。请问该怎么办?

请问是我代码的问题,还是我的excel模板设置的问题?谢谢!!


代码如下:

Dim Book As New XLS.Book(ProjectPath & "Attachments\分析报告zsy.xls") '打开模板
Dim fl As String = ProjectPath & "Reports\分析报告zsy.xls"
Book.Build() '生成报表
Book.Save(fl) 
Dim Proc As New Process 
Proc.File = fl
Proc.Start()

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.EntireColumn.AutoFit   '自动调整列宽
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True




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


加好友 发短信
等级:小狐 帖子:358 积分:4035 威望:0 精华:0 注册:2014/7/29 23:42:00
回复:(大红袍)excel自动行高,是有高度限制的,最高...  发帖心情 Post By:2015/9/16 19:47:00 [显示全部帖子]

那我该怎么办呢,我也不知道模板生成的单元格里有多少字,会有多高。

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


加好友 发短信
等级:小狐 帖子:358 积分:4035 威望:0 精华:0 注册:2014/7/29 23:42:00
回复:(machle)回复:(大红袍)excel自动行高,是有...  发帖心情 Post By:2015/9/16 19:53:00 [显示全部帖子]

是不是只能再调整列宽了?模板好复杂……工作量也很大。唉

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


加好友 发短信
等级:小狐 帖子:358 积分:4035 威望:0 精华:0 注册:2014/7/29 23:42:00
回复:(大红袍)如果想显示全部,你把不要生成excel,...  发帖心情 Post By:2015/9/16 20:12:00 [显示全部帖子]

我刚试了一下,保存为PDF,也不行啊,格式要怎么改嘛?
弄完和我之前excel显示的一样多。是我选的代码或者方法不对吗?

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim
fl As String = ProjectPath & "Reports\出库单.pdf"
Book
.Build() '生成细节区
Book
.SaveToPDF(fl) '保存为PDF文件
Dim
Proc As New Process '打开PDF文件
Proc
.File = fl
Proc
.Start()


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


加好友 发短信
等级:小狐 帖子:358 积分:4035 威望:0 精华:0 注册:2014/7/29 23:42:00
回复:(大红袍)我测试了一下,也不行。?无...  发帖心情 Post By:2015/9/16 20:27:00 [显示全部帖子]

那实在不行,我只能不用模板了。我再看看还有没有别的替代方式吧,若是您有更好的建议,也请告诉我,谢谢!!
[此贴子已经被作者于2015/9/16 20:27:23编辑过]

 回到顶部