Excel が認知している最終セルを取得する
Excel が認知している最終セルを取得する方法です
結果は Range オブジェクトで返されるので、ここから行などの情報を取得することが可能です
データが格納されている最後のセルとは異なる可能性があります
Dim o_sheet As WorkSheet
Dim o_range As Range

Set o_sheet = ThisWorkBook.WorkSheets(1)
Set o_range = o_sheet.Cells.SpecialCells(xlLastCell)

Set o_range = Nothing
Set o_sheet = Nothing