VBA 最終行を取得する方法

最終行を取得する方法

VBAで最終行を取得する方法を解説します。

最終行を取得する実行例

以下の方法は、途中で空白行があるとその空白行までしかカウントできません。

Sub 最終行取得()
    ' ### 最終行を取得する ###
    Dim lastRow As Long
    lastRow = Range("B1").End(xlDown).Row
    
    Debug.Print lastRow
End Sub