最終行・最終列取得

最終行を取得する。

Sheet1.UsedRange.Rows(Sheet1.UsedRange.Rows.Count).row

最終列を取得する。

Sheet1.UsedRange.Columns(Sheet1.UsedRange.Columns.Count).Column

Index