Excel VBAを使用して、ワークシート上で最終行を取得する方法についてのスニペットをご紹介します。 Sub 最終行を取得する() LastRow = Cells(Rows.Count, 1).End(xlUp).Row MsgBox "A列の最終行は「" & LastRow & "」行目" End Sub このサンプルコードでは…