深圳office培训 深圳excel培训
深圳excel培训 深圳office培训
咨询服务
深圳office培训
深圳office培训
office培训
excel培训
ppt培训
vba培训
access培训
word培训
visio培训
project培训
outlook培训
数据库培训
深圳access培训
深圳sql培训
深圳office培训
 

vba选取特定单元格延伸的方法


2016年8月10日 作者: 来源:

如果我要在EXCEL2010工作表中快速选取C列的第一个非空单元格C6,可在C1中使用Ctrl+l(向下箭头)选取;要选取数据区域右边的端点单元格D6,可在C6按Ctrl+→(向右箭头)选取;在D6位置按Ctrl+←(向左箭头),则会重新选取单元格C6。
我在VBA中利用Range对象的End属性,可以实现Ctrl+方向箭头的选取效果。
End(xlup):相当于Ctrl+↑(向上箭头)。
End(xldown):相当于Ctrl+↓(向下箭头)。
End(xltoleft):相当于Ctrl+←(向左箭头)。
End(xltoright):相当于Ctrl+→(向右箭头)。
例如在EXCEL2010表格中我要选取E列中第一个非空单元格,输入以下VBA代码即可是实现:
VBA选取特定单元格方法延伸
Sub E列第一个非空单元格()
If Range("E1") = "" Then
 Range("E1").End(xlDown).Select
ElSe
Range("E1").Select
End If
End Sub
If Range("E1")=""的功能是:如果E1值为空:Range("E1").End(xlDown)相当于在E1按Ctrl+↓(向下箭头)。如果我要选取E列最后一个非空单元格,输入以下VBA代码即可实现:
Sub 选取E列最后一个非空单元格()
Range(“E2565").End(xlUp).Select
End Sub
在这里Range("E2565").End(xlUp)是指E列最后一个非空单元格需要从E列最后个单元格向上查找。当我在运行上述程序后,即可选取EXCEL2010E列数据区域中最后一个非空单元格E11。


阅读:1193 上一则:vba搜索excel单元格的几种方法 下一则:vba代码实例之自动统计单元格个数

返回前页 返回顶部
温馨提示:本中心是深圳较为专业office培训机构、咨询及报名请先预约,电话:0755-82124110。
深圳地址:深圳红荔路四川大厦1109B-1110(3号龙岗线通新岭地铁站A出口10米)
热线:0755-82124110(福田、南山、宝安) 0755-22205758(罗湖、龙岗、龙华) 13510024571(东莞、惠州、珠海、广州)
北京地址:北京清华大学华业大厦三区三楼 版权所有:深圳万博计算机教育 粤ICP备11006947号-1
 
深圳信息系统项目管理师培训
深圳信息系统项目管理师培训 欢迎咨询!
您好!请点击这里咨询万博教育
深圳万博吴老师
您好!请点击这里咨询万博教育
深圳万博史老师
 
深圳信息系统项目管理师培训
深圳信息系统项目管理师培训