【VBA】最終行の取得方法

いくつか方法はありますが、今回紹介するのは途中で空白セルがあっても最終行を取得できる方法です。

対象列のデータがある最終行を取得

A列の最下行を取得します。

Sub GetLastRow()
    Dim lastRow As Long
    ' A列の最終行を取得
    lastRow = Cells(Rows.Count, 1).End(xlUp).Row
    MsgBox lastRow
End Sub