Range.Rows プロパティ (Excel)Range.Rows property (Excel)

指定した範囲の行を表す Range オブジェクトを返します。Returns a Range object that represents the rows in the specified range.

構文Syntax

expression.Rows

expressionRange オブジェクトを表す変数です。expression A variable that represents a Range object.

注釈Remarks

単一の行を取得するには、 Item プロパティを使用するか、またはかっこ内にインデックスを含めます。To return a single row, use the Item property or equivalently include an index in parentheses. たとえば、どちらのSelection.Rows(1)場合Selection.Rows.Item(1)も、選択範囲の最初の行を返します。For example, both Selection.Rows(1) and Selection.Rows.Item(1) return the first row of the selection.

複数選択されているrangeオブジェクトに対してこのプロパティを適用すると、指定範囲の最初の領域の行だけが返されます。When applied to a Range object that is a multiple selection, this property returns rows from only the first area of the range. たとえば、 RangeオブジェクトsomeRangeに A1: B2 および C3: D4 という2つの領域があるsomeRange.Rows.Count場合は、4ではなく2が返されます。For example, if the Range object someRange has two areas—A1:B2 and C3:D4—,someRange.Rows.Count returns 2, not 4. 複数のセル範囲を選択している可能性があるときは、このプロパティを使用する前に Areas.Count を実行し、範囲に複数の領域が含まれているかどうかを確認します。To use this property on a range that may contain a multiple selection, test Areas.Count to determine whether the range is a multiple selection. 複数の領域が含まれている場合は、3 番目の例のようにセル範囲の領域ごとにループします。If it is, loop over each area in the range, as shown in the third example.

返される範囲は、指定された範囲の外であることがあります。The returned range might be outside the specified range. たとえば、Range("A1:B2").Rows(5) はセル A5:B5 を返します。For example, Range("A1:B2").Rows(5) returns cells A5:B5. 詳細については、 Item プロパティを参照してください。For more information, see the Item property.

オブジェクト修飾子を指定せずにrowsプロパティを使用すると、 ActiveSheetを使用した場合と同じ結果になります。Using the Rows property without an object qualifier is equivalent to using ActiveSheet.Rows. 詳細については、「 Rows プロパティ」を参照してください。For more information, see the Worksheet.Rows property.

Example

次の使用例は、作業中のブックの Sheet1 のセル範囲 B5: Z5 を削除します。This example deletes the range B5:Z5 on Sheet1 of the active workbook.

Worksheets("Sheet1").Range("B2:Z44").Rows(3).Delete

次の使用例は、作業中のブックのワークシート1のセル1の値と前の行のセルの値が同じである行を削除します。This example deletes rows in the current region on worksheet one of the active workbook where the value of cell one in the row is the same as the value of cell one in the previous row.

For Each rw In Worksheets(1).Cells(1, 1).CurrentRegion.Rows
   this = rw.Cells(1, 1).Value 
   If this = last Then rw.Delete 
   last = this 
Next

次の使用例は、シート 1 の選択範囲の行数を表示します。This example displays the number of rows in the selection on Sheet1. 複数の領域が選択されている場合は、領域ごとにループします。If more than one area is selected, the example loops through each area.

Public Sub ShowNumberOfRowsInSheet1Selection
   Worksheets("Sheet1").Activate 
   
   Dim selectedRange As Excel.Range
   Set selectedRange = Selection
   
   Dim areaCount As Long
   areaCount = Selection.Areas.Count 
   
   If areaCount <= 1 Then 
      MsgBox "The selection contains " & _ 
             Selection.Rows.Count & " rows." 
   Else 
      Dim areaIndex As Long
      areaIndex = 1 
      For Each area In Selection.Areas 
         MsgBox "Area " & areaIndex & " of the selection contains " & _ 
                area.Rows.Count & " rows." 
         areaIndex = areaIndex + 1 
      Next 
   End If
End Sub

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.