excel中使用vba獲得當前表格列最後個非空單元格
工具/原料
excel2013
更多經驗請關注，如果幫到了你，請在上方給個投票謝謝支援。 好人一生平安。
先頂後看年薪百萬，如果幫到了你，幫忙給個好評，這對小編很重要，萬分感謝。
方法/步驟
首先我們開啟一個工作樣表作為例子。
當我們的正在使用的工作表輸入了非常多的資料的時候，我們就會難以尋找到表格列的最末尾，一般情況下我們不會見到資料達到幾萬條的表格，但是如果遇到了，又需要快速定位到末尾去怎麼處理呢。
這裡是做個比方，在該工作表內我們不確定哪個區域還有資料內容，但是我們可以用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為其它序列就可以了。
注意事項
謝謝你的觀看。