首页 > Excel专区 > Excel函数 >

Excel中利用VBA设置列宽和行高

Excel函数 2022-02-14 21:56:06

如果要用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函数

office教程网 Copyright © 2016-2020 http://www.office9.cn. Some Rights Reserved. 苏ICP备20040415号-9