Offset 属性 (Range 对象)

返回一个 Range 对象,该对象代表某个指定区域以外的区域。只读。

expression.Offset(RowOffset, ColumnOffset)

expression      必需。该表达式返回一个 Range 对象。

RowOffset Variant 类型,可选。该区域将偏移的行数(正值、负值或 0(零))。正值表示向下偏移,负值表示向上偏移,默认值为 0。

ColumnOffset Variant 类型,可选。该区域将偏移的列数(正值、负值或 0(零))。正值表示向右偏移,负值表示向左,默认值为 0。

示例

本示例激活 Sheet1 上活动单元格向右偏移三列、向下偏移两行处的单元格。

  Worksheets("Sheet1").Activate ActiveCell.Offset(rowOffset:=3, columnOffset:=2).Activate 本示例假设 Sheet1 中包含一个具有标题行的表格。本示例先选定该表格,但并不选择行首。  
  运行本示例之前,活动单元格必须位于表格中。  
  Set tbl = ActiveCell.CurrentRegion tbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, tbl.Columns.Count).Select    

Resize 属性

参阅应用于示例特性

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

expression.Resize(RowSize, ColumnSize)

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   
关于offset和resize的用法 今天你菊子曰了么?

相关文章: