2020-07-01 ExcelVBA データ入力されている最終セルの行を取得 ExcelVBA A1列のデータ最終行の例 Cells(Rows.Count, Range(”A1").Row).End(xlUp).Row ネタ元 http://officetanaka.net/excel/vba/tips/tips130.htm