【Excel VBA】取得使用儲存格最後一列列數

VBA取得最後一列列數

當我們使用VBA迴圈時，常會以第一列執行至最後一列，那要怎麼使用VBA取得使用儲存格中最後一列的列數呢？以下列出幾種主要的方法。

<此篇為精簡版，詳細說明可點選以下>

【Excel VBA】取得使用儲存格最後一列列數~詳細說明

See more

方法一 移到下方取列數

Sub 取得最後一列()
列 = Range(“A1”).End(xlDown).Row
MsgBox 列
End Sub

方法二 移到上方取列數

Sub 取得最後一列()
列 = Range(“A65536”).End(xlUp).Row
MsgBox 列
End Sub

方法三 取最大列數移上方

Sub 取得最後一列()
列 = Cells(Rows.Count, 1).End(xlUp).Row
MsgBox 列
End Sub

方法四 計算區域儲存格的列數

Sub 取得最後一列()
列 = Range(“A1”).CurrentRegion.Rows.Count
MsgBox 列
End Sub

方法五 列數加一直到空白列

Sub 取得最後一列()
列 = 1
Do While Cells(列, 1) <> “”
列 = 列 + 1
Loop
MsgBox 列 – 1
End Sub

以上執行後則取得最後一列列數！

VBA取得最後一欄欄數

【Excel VBA】取得使用儲存格最後一欄欄數

See more

其他文章分享