Foxtable(狐表)用户栏目专家坐堂 → 问个EXCEL的自动行高的问题


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

主题:问个EXCEL的自动行高的问题

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


加好友 发短信
等级:幼狐 帖子:166 积分:1440 威望:0 精华:0 注册:2014/4/13 20:18:00
问个EXCEL的自动行高的问题  发帖心情 Post By:2014/12/19 9:15:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20141219091249.png
图片点击可在新窗口打开查看
如图,上边和下边都是设置了行高自动。。。但是生成报表上边的可以自动行高,下边的不能自动行高调整。。可能是哪的问题呢?

手动选择下边的单元格设置自动行高也是没反应。

迷糊中


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/19 9:17:00 [只看该作者]

 要加入代码。

 

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
'Rg.EntireColumn.AutoFit   '自动调整列宽
Rg.EntireRow.AutoFit  '自动调整行高
'Rg.WrapText = True
App.Visible = True


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


加好友 发短信
等级:幼狐 帖子:132 积分:1232 威望:0 精华:0 注册:2017/3/20 13:41:00
  发帖心情 Post By:2017/4/18 11:38:00 [只看该作者]

这个代码写在哪个事件里呀,谢谢!

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106802 积分:543211 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/4/18 12:07:00 [只看该作者]

你需要的地方,比如按钮事件

 回到顶部