シートの最大行数を取得する
早速結論です。シートの最大行を取得するには次の構文を使用します。
Worksheets("シート名").Cells(Rows.count, 1).End(xlUp).Row
上の構文は、1列目で最終行を探しています。
『Cells(Rows.count, 1)』の数値（赤字）を変更すれば、その列で最終行を取得します。
※1列目が空であったり、列によって行の数が違う時に使用します。
'2列目で最大行数を取得する
Worksheets("シート名").Cells(Rows.count, 2).End(xlUp).Row
'3列目で最大行数を取得する
Worksheets("シート名").Cells(Rows.count, 3).End(xlUp).Row
