完整介绍Excel End(xlUp).Row

《完整介绍Excel End(xlUp).Row》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、完整介绍ExcelEnd(xlUp).Row一、End(xlUp).Row介绍　　功能是返回一个Range对象，该对象代表包含源区域的区域尾端的单元格。等同于按键End+向上键、End+向下键、End+向左键或End+向右键。Range对象，只读。　　其语法如下：　　expression.End(Direction)　　expression必需。该表达式返回“应用于”列表中的对象之一。　　DirectionXlDirection类型，必需。所要移动的方向。　　XlDirection可为XlDirection常量之一。　　xlDown　　xlToRight　　xlToLeft　　

2、xlUp　　二、End(xlUp).Row示例　　本示例选定包含单元格B4的区域中B列顶端的单元格。　　Range("B4").End(xlUp).Select　　本示例选定包含单元格B4的区域中第4行尾端的单元格。　　Range("B4").End(xlToRight).Select　　本示例将选定区域从单元格B4延伸至第四行最后一个包含数据的单元格。　　Worksheets("Sheet1").Activate　　Range("B4",Range("B4").End(xlToRight)).Select　　再比如：　　Range("a65536").End(xlUp).Ro

3、wA列数据区域最后一行的行号　　Range("b65536").End(xlUp).RowB列数据区域最后一行的行号　　Range("d65536").End(xlUp).RowD列数据区域最后一行的行号　　Range("k65536").End(xlUp).RowK列数据区域最后一行的行号　　最后，再看看一段VBA调用的代码吧：　　Dimi,M,iRow,sh,arr　　M=0.0015　　ForEachshInThisWorkbook.Sheets　　iRow=sh.[D65535].End(xlUp).Row　　ReDimarr(1ToiRow,1To2)　　arr=sh

4、.Range("D3:E"&iRow)　　Fori=2ToUBound(arr)　　arr(i,1)=arr(i,1)*M　　arr(i,2)=arr(i,2)*M　　Next　　arr(1,1)=Application.Substitute(arr(1,1),"平方米","亩")　　arr(1,2)=Application.Substitute(arr(1,2),"平方米","亩")　　sh.Range("D3:E"&iRow)=arr　　Next