2-13.セルの終端を探す

データが連続で入力されている状態で、終端のセルを参照する。これは「コントロール+方向キー」と同じです。ただし、途中に空白のセルがあると、終端を見つけることができません。

○A列の終端を見つけ、A8に終端のデータを表示するマクロ


○実行結果


○プログラム
Sub セルの終端()
a = Range("A2").End(xlDown)
Range("A8").Value = a
End Sub


○解説
a = Range("A2").End(xlDow)



Range("A8").Value = a
A2から下(xlDown)の終端を見つけ、終端のデータを変数aに記憶する。

記憶した変数aのデータをA8のセルに表示させる。A8にはA6のデータEが表示される。

Rangeオブジェクト.end(定数)
定数 移動方向
xlUp
xlDown
xlToLeft
xlToRight


メニューへ戻る

inserted by FC2 system