【VBA】Rangeの行、列、行數、列數を取得

嚯嚯go發表於2024-09-30

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

    行的取得:

    列を取得:

相關文章