office教程office教程

office办公学习网
office办公学习网(www.168361.com)是自己整理的一些文章,用于自己学习office使用,如果侵犯了您的版权,请联系我们删除。网站包含office/word/wps等使用技巧大全全集,office百科全书

Excel怎么快速定位列最后一个非空单元格

  在对Excel数据表进行操作时,有时需要快速定位到某列最后一个非空单元格,这在编写VBA程序时,一般使用Range对象的End属性来实现。以下是学习啦小编为您带来的关于Excel快速定位列最后一个非空单元格,希望对您有所帮助。

  Excel快速定位列最后一个非空单元格

  1、启动Excel并打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在模块的;代码;窗口中输入程序代码,如图1所示。实现功能的具体程序代码如下所示:

  Sub toLastRow()

  Dim c As Range

  Set c=ActiveSheet.Range("A65536").End(xlUp)

  MsgBox "A列最后一个非空单元格为:"&c.Address

  c.Activate

  End Sub

Excel怎么快速定位列最后一个非空单元格

  图1 添加模块并编写程序

  提示

  在Excel VBA中,End属性将返回一个Range对象,该对象代表包含源区域的区域尾端单元格,当指定的Range对象为多单元格区域时,默认为左上角的单元格。在程序中,使用Range对象的End属性来获得A列最后一个非空单元格并将其赋予变量c。

  2、按F5键运行该过程,程序给出提示对话框,提示最后一个非空单元格的地址,如图2所示。单击;确定;按钮关闭对话框后,程序将定位到该单元格,如图3所示。

Excel怎么快速定位列最后一个非空单元格

  图2 程序给出提示

Excel怎么快速定位列最后一个非空单元格

  图3 定位到指定单元格
 

猜你喜欢:

1.excel单元格为空时怎么显示我们的警示标志防止漏掉数据

2.Excel如何隔列插入多列空白列

3.excel2010中仅允许用户编辑固定区域单元格的设置方法

4.excel表格ADDRESS函数怎样设置对某单元格引用

5.Excel2013中单元格出现不能拖拽的解决方法

本文链接:http://168361.com/excel/998.html

版权声明:内容均来源于互联网 如有侵权联系删除

最后编辑于:2016-07-25作者: excel教程

如此有趣的数据转置
将excel工作表拆分为多个窗格