参考元：【VBA】Rangeの行、列、行数、列数を取得【Row、Column、Countを使う】
https://daitaideit.com/vba-range/
ポイントとなるVBAコード
最初にポイントとなるVBAコードを記載しておきます。
VBAコードだけ確認したい場合に、ご活用ください。
'行数と列数
With ActiveSheet.Range("B3:E7")
Debug.Print .Rows.Count '行数
Debug.Print .Columns.Count '列数
End With
'行番号と列番号
With ActiveSheet.Range("B3:E7")
Debug.Print .Row '最初の行番号
Debug.Print .Rows(.Rows.Count).Row '最後の行番号
Debug.Print .Column '最初の列番号
Debug.Print .Columns(.Columns.Count).Column '最後の列番号
End With
'値
With ActiveSheet.Range("B3:E7")
.Cells(1, 1).Select '左上の値
.Cells(1, .Columns.Count).Select '右上の値
.Cells(.Rows.Count, 1).Select '左下の値
.Cells(.Rows.Count, .Columns.Count).Select '右下の値
.Cells(.Count).Select '右下の値
End With
'行と列
With ActiveSheet.Range("B3:E7")
.Rows(1).Select '最初の行
.Rows(.Rows.Count).Select '最後の行
.Columns(1).Select '最初の列
.Columns(a.Columns.Count).Select '最後の列
End With
- 行数と列数を取得:
- 最初と最後の行番号:
- 最初と最後の列番号:
- セルの値を取得:
行的取得：
列を取得:
