第48讲 第49讲--动态定位单元格区域1-End属性、动态定位单元格区域2、3-Currentregion UsedRange

1 单元格区域.
EntireRow返回该区域所在的整行对象单元格区域.
EntireColumn返回该区域所在的整列

'返回单元格所在的整行与整列，返回单元格对象
'EntireRow 与EntireColumn
Sub 整行与整列()
'    Range("a1").EntireColumn = 0
    Range("a1").EntireRow.Select
End Sub

2 单元格区域.Select方法，选中某区域。多见于演示
3 动态定位单元格对象区域(一)
单元格.End :
End属性返回单元格区域的边界单元格，从起始单元格出发可以分别向上下左右四个方向进行边界定位。
推荐使用End(xlup)向上,End(xldown)向下，End(xltoleft)向左,End(xltoright)向右这些参数而不要用1,2,3,4这些数字。
使用End定位边界时,往往倒着找的道理。

'单元格的边界定位属性
'End 属性的四个方向，从某一位置单元格出发，向四个方向寻找边界, 返回的是一个边界单元格对象
'从A1 出发向下寻找最后的边界单元格
'End 面临的问题 有空记录定位错误的问题
'倒着找,从最后一行向上倒着找，找到第一个有数据的单元格，一定是包含数据的最后一个边界单元格

Sub End演示1()
    Debug.Print Range("a1").End(xlDown).Row
End Sub

Sub End演示2()
    Debug.Print Range("a" & Rows.Count).End(xlUp).Row
End Sub

'End 一些不良用法：
'Range(“a65536”).end(3).row &