Range.Rows 属性 (Excel)

返回一个 Range 对象,它表示指定区域中的行。

语法

表达式

expression 一个表示 Range 对象的变量。

备注

若要返回单个行,请使用 Item 属性或等效地在括号中包含索引。 例如,和 Selection.Rows.Item(1)Selection.Rows(1)返回所选内容的第一行。

当应用于作为多重选择的 Range 对象时,此属性仅返回该区域的第一个区域的行。 例如,如果 Range 对象 someRange 有两个区域(A1:B2 和 C3:D4),someRange.Rows.Count 则返回 2,而不是 4。 若要在一个可能包含多个选定区域的区域中使用此属性,请测试 Areas.Count 以确定该区域是否包含多个选择区域。 如果是,则对区域中的每个子区域进行循环,如第三个示例中所示。

返回的区域可能位于指定区域之外。 例如,Range("A1:B2").Rows(5) 返回单元格 A5:B5。 有关详细信息,请参阅 Item 属性。

使用不带对象限定符的 Rows 属性等效于使用 ActiveSheet.Rows。 有关详细信息,请参阅 Worksheet.Rows 属性。

示例

本示例删除活动工作簿 Sheet1 上的区域 B4:Z4。

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

本示例删除活动工作簿第一张工作表上当前区域中的行,其中行中第一个单元格的值与上一行中第一个单元格的值相同。

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

此示例显示 Sheet1 选定区域中的行数。 如果选择了多个子区域,此示例将对每一个子区域进行循环。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。