3-17、单元格的Offset

3-17、单元格的Offset

Range.Offset 属性

 

返回 Range 对象，它代表位于指定单元格区域的一定的偏移量位置上的区域。

表达式.Offset(偏移行, 偏移列)

表达式   一个代表 Range 对象的变量。

偏移行列的数字可以是：正数，负数，零值

Sub test()

[a1].Offset(1, 2).Select    '行列都偏移   偏移一行，2列

[a1].Offset(2).Select       '只偏移行       偏移2行

[a1].Offset(, 2).Select     '只偏移列       偏移两列，行不偏移，0可以不写

 

'如果offset前面的range对象是一个区域，则偏移后也结果尺寸不变

[a1:d1].Offset(1, 2).Select      '偏移1行，2列

[a1:d1].Offset(2).Select          '偏移1行

[a1:d1].Offset(, 2).Select        '偏移两列，行不偏移，0可以不写

End Sub

 

Sub offset应用1()

Dim i%

For i = 2 To 8 Step 2

    [a1:e1].Copy [a1:e1].Offset(i)

Next i

End Sub

Sub offset应用2()

Dim i%

For i = 2 To 8 Step 2

    [a1:e1].Offset(i) = ""

Next i

End Sub