2行目から最終行まで選択する方法
2024年08月17日

サンプルコード
Sub 最終行までを選択()
'最終行を取得する
Dim LastRow As Long
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
'セルA2~最終行のB列までを選択する
Range(Cells(2, "A"), Cells(LastRow, "B")).Select
End Sub
実行結果
セルA2~B9までを選択することが出来ました

関連記事
![]() |
CSVファイルをエクセルへ読み込みを行う方法 |
![]() |
フォルダを一括で作成する方法 |
![]() |
テキストファイルの読み込み |