使用宏在工作簿中处理数据和格式化输出并不罕见。如果您使用宏来执行此类工作,则可能会对使用宏更改行的高度感兴趣。如果是这样,则应注意RowHeight属性。当将此属性应用于Row对象时,以点为单位指示行的高度。

例如,以下代码片段逐步遍历选择中的各行,并将每行的高度设置为36点(二分之一英寸):

For Each r In ActiveWindow.RangeSelection.Rows     r.RowHeight = 36 Next r

如果您不想单步执行每一行,则可以使用以下单行来调整行高:

Selection.RowHeight = 36

两种方法都将设置执行代码时选择的所有行的高度。如果希望宏调整行的特定范围,则可以直接在代码中指定行:

ActiveSheet.Rows("3:34").RowHeight = 36

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(9239)适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。您可以在此处找到适用于Excel的较早菜单界面的本技巧的版本: