1.Worksheets("Sheet1").Range("A1").End(xlDown).Select \'意思为自A1起，返回从上往下的最后一个非空单元格
此时返回的单元格是A2，写法也可以拆分：
Worksheets("Sheet1").Range("A1").Select
Selection.End(xlDown).Select
2.Worksheets("Sheet1").Range("A6").End(xlUp).Select \'意思为自A6起，返回从下往上的最后一个非空单元格，此时返回的单元格是A4