ExcelVBA,指定したセル範囲の行数を取得して変数に格納する

スポンサーリンク

鍛錬 610

ExcelVBA,指定したセル範囲の行数を取得して、変数に格納する

指定したセル範囲の行数を取得して変数に格納するには、Rows プロパティを使用します。
 
使用方法は、以下に示す通りです。

変数 = Selection.Rows.Count
スポンサーリンク

マクロ

以下は、指定したセル範囲の行数を取得するマクロ、GetCountRows() です。

今回は、セル範囲 B3:D5 の行数を取得して変数に格納し、MsgBox で変数の値を表示しています。

選択するセル範囲
B3:D5
Sub GetCountRows()
    Dim num As Long
    
    ' 行数を取得するセル範囲を選択
    Range("B3:D5").Select
    
    ' 指定した範囲の行数を取得
    num = Selection.Rows.Count
    
    MsgBox num
End Sub
スポンサーリンク

実行結果

以下は、マクロ GetCountRows() の実行結果です。

セル範囲 B3:D5 の行数は、3 であることが分かりました。

行数を取得した様子

タイトルとURLをコピーしました