以文本方式查看主题

-  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=61782)

--  作者:80帅兜
--  发布时间:2014/12/19 9:15:00
--  问个EXCEL的自动行高的问题


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

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

迷糊中


--  作者:有点甜
--  发布时间: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
--  发布时间:2017/4/18 11:38:00
--  
这个代码写在哪个事件里呀,谢谢!
--  作者:有点蓝
--  发布时间:2017/4/18 12:07:00
--  
你需要的地方,比如按钮事件