Excel怎么快速定位列最后一個非空單元格

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

　　圖1　添加模塊并編寫程序

　　提示

　　在Excel VBA中，End屬性將返回一個Range對象，該對象代表包含源區域的區域尾端單元格，當指定的Range對象為多單元格區域時，默認為左上角的單元格。在程序中，使用Range對象的End屬性來獲得A列最后一個非空單元格并將其賦予變量c。

　　2、按F5鍵運行該過程，程序給出提示對話框，提示最后一個非空單元格的地址，如圖2所示。單擊“確定”按鈕關閉對話框后，程序將定位到該單元格，如圖3所示。

　　圖2　程序給出提示

　　圖3　定位到指定單元格

猜你喜歡：

1.excel單元格為空時怎么顯示我們的警示標志防止漏掉數據

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

3.excel2010中僅允許用戶編輯固定區域單元格的設置方法

4.excel表格ADDRESS函數怎樣設置對某單元格引用

5.Excel2013中單元格出現不能拖拽的解決方法