Excel Home
全球知名的Excel资源网站之一

Range对象的End属性返回的结果

本文为《别怕,Excel VBA其实很简单(第3版)》随书问题参考答案

如果工作表中已使用的区域如下图:

则下面是E6和D5单元格中End属性各个设置返回的单元格:

Sub End属性()
Range("E6").End (xlUp) '返回E1单元格
Range("E6").End (xlDown) '返回E10单元格
Range("E6").End (xlToLeft) '返回C6单元格
Range("E6").End (xlToRight) '返回G6单元格
Range("D15").End (xlUp) '返回D10单元格
Range("D15").End (xlDown) '返回D1048657,即D列最后一个单元格
Range("D15").End (xlToLeft) '返回A15单元格
Range("D15").End (xlToRight) '返回XFD15,即第15行的最后一个单元格
End Sub

可以用MsgBox函数获得每个返回单元格的Address属性,查看每个单元格的地址,过程为:

Sub End属性()
MsgBox Range("E6").End(xlUp).Address
MsgBox Range("E6").End(xlDown).Address
MsgBox Range("E6").End(xlToLeft).Address
MsgBox Range("E6").End(xlToRight).Address
MsgBox Range("D15").End(xlUp).Address
MsgBox Range("D15").End(xlDown).Address
MsgBox Range("D15").End(xlToLeft).Address
MsgBox Range("D15").End(xlToRight).Address
End Sub

只要执行这个过程,就能看到每行代码返回单元格的地址,如:

赞(0)
未经允许不得转载:ExcelHome » Range对象的End属性返回的结果
分享到: 更多 (0)

关于我们联系我们
本站特聘法律顾问:李志群律师   沪ICP备11019229号-2

沪公网安备 31011702000001号

征信