HOME>TOP>セル

データ(表)の最終行を取得するには？

キーワード>>最終行・Row・End(xlUp)・Rows.Count

　

Point：表などでデータの一番下の行番号を知りたい場合に使います。


Sub Test()
     Dim i

       'Cells(Rows.Count, 1)←A列の最後の行
     i = Cells(Rows.Count, 1).End(xlUp).Row

     MsgBox "最終行は、" & i

End Sub

掲載サンプルコードの使用に関して、直接・間接
を問わず生じた一切の損害について如何なる責任も負いません。