Range.Rows property (Excel)

• 05/11/2019
• 2 minutes de lecture
• • o
  • DivisionM
  • DivisionO

  .

  • k
  • K
  • +2

Retourne un objet Range qui représente les lignes de la plage spécifiée.

Syntaxe

expression.Rows

expression Une variable qui représente un objet Range.

Remarques

Pour retourner une seule ligne, utilisez la propriété Item ou de manière équivalente, incluez un index entre parenthèses. Par exemple, les deux Selection.Rows(1) et Selection.Rows.Item(1) renvoient la première ligne de la sélection.

Lorsqu’elle est appliquée à un objet Range qui est une sélection multiple, cette propriété renvoie les lignes de la première zone de la plage uniquement. Par exemple, si l’objet Range someRange possède deux zones-A1:B2 et C3:D4-,someRange.Rows.Count renvoie 2, et non 4. Pour utiliser cette propriété sur une plage qui peut contenir une sélection multiple, testez Areas.Count pour déterminer si la plage est une sélection multiple. Si c’est le cas, bouclez sur chaque zone de la plage, comme indiqué dans le troisième exemple.

La plage retournée pourrait être en dehors de la plage spécifiée. Par exemple, Range("A1:B2").Rows(5) renvoie les cellules A5:B5. Pour plus d’informations, consultez la propriété Item.

L’utilisation de la propriété Rows sans qualificatif d’objet équivaut à l’utilisation de ActiveSheet.Rows. Pour plus d’informations, voir la propriété Worksheet.Rows.

Exemple

Cet exemple supprime la plage B5:Z5 sur la feuille1 du classeur actif.

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

Cet exemple supprime les lignes de la région actuelle sur la feuille de calcul un du classeur actif où la valeur de la cellule un de la ligne est la même que la valeur de la cellule un de la ligne précédente.

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

Cet exemple affiche le nombre de lignes dans la sélection sur Sheet1. Si plus d’une zone est sélectionnée, l’exemple boucle sur chaque zone.

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 IfEnd Sub

Support et commentaires

Vous avez des questions ou des commentaires sur Office VBA ou cette documentation ? Veuillez consulter la rubrique Assistance et commentaires sur Office VBA pour obtenir des conseils sur les moyens de recevoir de l’aide et de fournir des commentaires.