最終セル取得



最終セルの取得

特定のセルや範囲などを起点として最終の位置を取得する方法についてです。
関数、メソッドなど
Range.End(Direction)

Rangeのを起点として上下左右に任意の最終セルを取得するプロパティです。

一番最後の行のセルを取得
1) Range(address).End (xlDown)
2) Cells(Rows.Count, column).End (xlUp)

一番最後の列のセルを取得
1) Range(address).End(xlToRight)
2) Cells(row), Columns.Count).End(xlToLeft)


名前 説明 値
xlDown 下へ　 　-4121　
xlUp 上へ 　-4162　
xlToLeft 左へ 　-4159　
xlToRight　 右へ 　-4161　
Direction種類



例）セルA1からの取得


例1） セルA1からの最終行のセル選択
Sub LastSample1()

　Range("A1").End(xlUp).Select

End Sub


例2） セルA1からの最終行のセルの行番号 
Sub LastSample2()

　Cells(Rows.Count, 1).End(xlUp).Row

End Sub


例3） セルA1からの最終列のセル選択 
Sub LastSample3()

　Range("A1").End(xlToRight).Select

End Sub


例4） セルA1からの最終列のセルの列番号 
Sub LastSample4()

　Cells(1, Columns.Count).End(xlToLeft).Column

End Sub
ラベル: