【エクセルVBA】シートの入力範囲(データがある範囲)を取得する

スポンサーリンク
excelvba エクセル
スポンサーリンク

エクセルで入力されているセル範囲を取得する方法です。

データが入っているセル範囲のmax列とmax行を数値で取得します。

ループ処理などで範囲を指定している場合、あてずっぽうでセル範囲を指定すると、後々セルを挿入すると範囲をはみ出してしまって不具合のもとになってしまいます。

また、余計なループ処理をして処理速度をロスしているかもしれません。

そのような事象を生まないように、常に入力されている範囲を取得する方が何かと好都合です。

下記はシートの入力セル範囲を取得する方法です。

RowとColumnを取得します。

With ThisWorkbook.Worksheets("sheet1").UsedRange
MaxRow = .Find("*", , xlFormulas, , xlByRows, xlPrevious).Row
MaxCol = .Find("*", , xlFormulas, , xlByColumns, xlPrevious).Column
End With

コメント

タイトルとURLをコピーしました