Resize 属性

调整指定区域的大小。返回 Range 对象，该对象代表调整后的区域。

expression   必需。该表达式返回要调整大小的 Range 对象。

RowSize   Variant 类型，可选。新区域中的行数。如果省略该参数，则该区域中的行数保持不变。

ColumnSize   Variant类型，可选。新区域中的列数。如果省略该参数。则该区域中的列数保持不变。

示例

本示例调整 Sheet1 中选定区域的大小，使之增加一行和一列。

Worksheets("Sheet1").Activate
numRows = Selection.Rows.Count
numColumns = Selection.Columns.Count
Selection.Resize(numRows + 1, numColumns + 1).Select

本示例假定在 Sheet1 中有一个包含标题行的表。本示例选定该表，但不选定标题行。运行本示例之前，活动单元格必须处于该表中。

Set tbl = ActiveCell.CurrentRegion
tbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, _
    tbl.Columns.Count).Select