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

参考元：【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

• 行数と列数を取得:
  
• 最初と最後の行番号:
  
• 最初と最後の列番号:
  
• セルの値を取得:
  
  行的取得：
  
  列を取得: