标签：next code png 表头 for 数字 bsp ext color
‘Range.Offset 属性
‘返回 Range 对象，它代表位于指定单元格区域的一定的偏移量位置上的区域。
‘表达式.Offset(偏移行, 偏移列)
‘表达式 一个代表 Range 对象的变量。
‘偏移行列的数字可以是：正数，负数，零值
1 Sub test() 2 [a1].Offset(1, 2).Select ‘行列都偏移 3 [a1].Offset(2).Select ‘只偏移行 4 [a1].Offset(, 2).Select ‘只偏移列 5 6 ‘如果offset前面的range对象是一个区域，则偏移后也结果尺寸不变 7 [a1:d1].Offset(1, 2).Select 8 [a1:d1].Offset(2).Select 9 [a1:d1].Offset(, 2).Select 10 End Sub
若[a1].offset(0,0).select则选中A1本身
Range.Offset结合Range.Copy Range
1 Sub offset应用1() 2 Dim i% 3 For i = 2 To 8 Step 2 4 [a1:e1].Copy [a1:e1].Offset(i) 5 Next i 6 End Sub
Sub offset应用2() Dim i% For i = 2 To 8 Step 2 [a1:e1].Offset(i) = ""‘删除之前添加的表头（用空值""代替） Next i End Sub
标签：next code png 表头 for 数字 bsp ext color
原文地址：http://www.cnblogs.com/gilgamesh-hjb/p/7421274.html
