Excel中运用VBA设置列宽与行高|萝卜系统

Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。

如果要用VBA来设置区域的行高和列宽，可以用Range.ColumnWidth 属性和Range.RowHeight 属性，例如下例将选定的区域中各单元格的列宽和行高调整为指定的数值：

Sub SetColumnAndRow()
With ActiveWindow.RangeSelection
.ColumnWidth = 3
.RowHeight = 19
End With
End Sub

如果要将选定区域内的各单元格的列宽和行高调整为最合适的值，可以用下面的代码：

Sub SetColumnAndRow()
With ActiveWindow.RangeSelection
.Columns.AutoFit
.Rows.AutoFit
End With
End Sub

下面的代码将活动工作表中的所有单元格的行高和列宽恢复为默认值：

Sub SetDefault()
With ActiveSheet
.Columns.ColumnWidth = .StandardWidth
.Rows.RowHeight = .StandardHeight
End With
End Sub

Excel整体界面趋于平面化，显得清新简洁。流畅的动画和平滑的过渡，带来不同以往的使用体验。

……