大家好,
我在对文件筛选后,合并单元格里不用双击就能完全显示里面的内容。使用自适应行高没有任何作用。所以,我就想用宏来实现,可我vba刚刚入门,完全没有什么思路,请大家帮帮忙啊。感激不尽!!!
发不了附件,请大家看帖:http://club.excelhome.net/thread-507579-1-1
代码如下:
- VB.NET code
Sub AutoFitMergedCellRowHeight() Dim CurrentRowHeight As Single, MergedCellRgWidth As Single Dim CurrCell As Range Dim ActiveCellWidth As Single, PossNewRowHeight As Single Dim StartCell As Range, c As Range, MergeRng As Range, Cell As Range Dim a()e
谢谢啦。
------解决方案--------------------------------------------------------
列AUTOFIT应该可以的啊