教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA セル操作】指定範囲のレコード件数を数える(Rows.Count)方法を教えて!

構文

構文は以下の通りです。

Range("セル範囲").Rows.Count

解説

Rows.Countプロパティは、指定したセル範囲内の行数を取得します。このプロパティは特定の範囲に対して行数を取得するのに役立ちます。Range("セル範囲")には、行数を取得したいセル範囲を指定します。

使い方

具体的な使い方を紹介します。

Range("A1:D10").Rows.Count

この例では、セル範囲"A1:D10"の行数を取得しています。指定したセル範囲によって結果は変わります。

プログラミング例

以下に、プログラミング例を紹介します。

Sub GetRowCount()
    ' データ範囲を指定
    Dim dataRange As Range
    Set dataRange = ThisWorkbook.Worksheets("成績表").Range("A2:A10")
    ' 行数を取得
    Dim rowCount As Long
    rowCount = dataRange.Rows.Count
    ' 結果を表示
    MsgBox "データ範囲の行数は" & rowCount & "行です。"
End Sub

このコードを実行すると、データ範囲の行数がメッセージボックスで表示されます。

まとめ

Rows.Countプロパティを使うことで、指定したセル範囲内の行数を簡単に取得できます。動的なデータ範囲の行数を取得したり、特定の操作を行う際に範囲の行数を知ることができる便利なプロパティです。是非活用してください。