摘要： 如果要用VBA来设置区域的行高和列宽，可以用Range.ColumnWidth 属性和Range.RowHeight 属性，例如下例将选定的区域中各单元格的列宽和行高调整为指定的数值： Sub SetColumnAnd...
如果要用VBA来设置区域的行高和列宽，可以用Range.ColumnWidth 属性和Range.RowHeight 属性，例如下例将选定的区域中各单元格的列宽和行高调整为指定的数值：
Sub SetColumnAndRow()
With ActiveWindow.RangeSelection
.ColumnWidth = 3
.RowHeight = 19
End With
End Sub
如果要将选定区域内的各单元格的列宽和行高调整为最合适的值，可以用下面的代码：
用VBA代码在Excel状态栏中显示提示信息
当我们在运行一个执行时间稍长的VBA代码时，可以用下面的VBA代码在状态栏中显示一些信息来提示用户： Application.StatusBar = "提示信息" 代码运行完毕，再恢复默认状态栏： Application.StatusBar = FALSE 例如下面的代码在状态栏中显示“
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用VBA更改批注的作者
在Excel中，当光标移动到包含批注的单元格中时，通常会在状态栏和批注中显示批注者的名称。如果需要将批注者改为其他人，可以用下面的VBA代码。以后再插入新的批注，也将使用新输入的名称。使用前先将代码中的“新作者”和“原作者”按照需要进行替换。 Sub ChangeComm
