最端セルの取得

■Endプロパティを使用する オブジェクト.End( 方向 ) オブジェクト:出発点となるセルのオブジェクト 方向:以下の引数より指定する xlUp (上)xlDown(下)xlToRight(右)xlToLeft(左) ■使用例 Sub sample() Dim targetRange As Range Set targetRange = Range("A1").End(xlDown) '以下の書き方でも同じ結果が得られる…