參考元:【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
- 行數と列數を取得:
- 最初と最後の行番號:
- 最初と最後の列番號:
- セルの値を取得:
行的取得:
列を取得: