2012-07-09 71 views
1

在Excel中,如果双击其右侧“边框”上的列,则可以将宽度自动调整为该列中最大值的宽度。将列宽扩大到该列中最大值的大小?

如何在VBA中复制这个?

+2

记录一个宏,看看? (range.entirecolumn.autofit) – 2012-07-09 13:56:25

+0

道歉 - 完全忘了我可以做到这一点! – mezamorphic 2012-07-09 13:57:45

+0

发布它作为答案,我会接受 - 我认为你是第一个无论如何 – mezamorphic 2012-07-09 14:07:58

回答

5

您可以使用宏录制要执行的操作&看;

<range>.entirecolumn.autofit 
+1

+ 1建议宏记录器。 – 2012-07-09 14:15:55

3

致电AutoFit方法Column对象。

像这样:

ActiveSheet.UsedRange.Columns.AutoFit 

或像这样:

Columns("A:A").EntireColumn.AutoFit 
+0

自动调整行的高度相同的逻辑;) – 2012-07-09 13:56:49

+1

+ 1对于张贴它第一:) – 2012-07-09 14:16:05