①Offset属性
1.以A1为参照对象,往下移一行,再往右移3列,即选择D2单元格。
Range("A1").Offset(1,3).Select
2.以D16为参照对象,往上移2行,再往左移1列,即选择C14单元格。
Range("D16").Offset(-2,-1).Select
3.选择同列单元格(上一行)
ActiveCell.Offset(-1,0).Select
4.重新选取区域
ActiveCell.Offset(2,2).Resize(2,4).Select
②END属性(移动到连续有内容的单元格)
1.选择当前行的最后一个单元格
ActiveCell.End(xlToRight).Select
2.选择当前行的最前一个单元格
ActiveCell.End(xlToLeft).Select
3.选择当前列的最后一个单元格
ActiveCell.End(xlDown).Select
4.选择当前列的最前一个单元格
ActiveCell.End(xlUp).Select