excel中使用vba獲得當前表格列最後個非空單元格

小編致力於為大家奉獻最有效的經驗,讓大家能夠解決掉問題,但是大家也都知道,每個人遇到的情況都是不一樣的,大家在看小編經驗的同時,除了跟隨操作,也需要自己的思考,舉一反三的解決問題,這樣才會變得更加有內涵,成為和小編一樣的經驗達人。excel中使用vba獲得當前表格列最後個非空單元格,這裡,讓小編給大家介紹一下。

工具/原料

excel2016
此經驗本人原創首發,未經本人許可請勿轉載。

方法/步驟

首先我們打開一個工作樣表作為例子。

當我們的正在使用的工作表輸入了非常多的數據的時候,我們就會難以尋找到表格列的最末尾,一般情況下我們不會見到數據達到幾萬條的表格,但是如果遇到了,又需要快速定位到末尾去怎麼處理呢。

這裡是做個比方,在該工作表內我們不確定哪個區域還有數據內容,但是我們可以用vba來快速尋找到該列需要定位的最後一個有數據的單元格。這裡我們先使用alt+f11組合快捷鍵進入vbe編輯器,插入一個新的模塊,並在模塊中輸入以下代碼:

Option Explicit

Sub dingwei()

Dim rng As Range

Set rng = ActiveSheet.Range("a65536").End(xlUp)

rng.Activate

Set rng = Nothing

End Sub

這裡我們應用的是end方法。它作用的對象是range("a65536")單元格,向上最後一個有數據的單元格。xlup即向上尋找有數據單元格的end參數。

因為我們把該單元格賦值給rng區域,所以這裡激活它,就是跳轉到該單元格。如圖所示激活了a72這個單元格。

a65536這個序列號指的是excel最多擁有65536個列單元格,如果我們要選擇查找其它列的最後一個有數據的單元格,只需要修改序列a為其它序列就可以了。

先寫到這裡了,謝謝大家的觀看。

祝大家生活愉快。

小編還有許多其他的經驗可以觀看,如果無法解決問題可以聯繫小編進行諮詢。

看不清楚圖片的可以點擊放大再看哦。

注意事項

個人經驗,僅供參考。

本文內容整理自網絡, 文中所有觀點看法不代表淘大白的立場