尘风
红尘往事,一切随风

 

 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

 

posted on 2020-03-18 14:36  一个行者  阅读(6052)  评论(0编辑  收藏  举报