Classe ListRow (Excel VBA)

La classe ListRow représente une ligne d’un tableau.

Set

Pour utiliser une variable de classe ListRow, elle doit d'abord être instanciée, par exemple

Dim lstrw as ListRow
Set lstrw = ActiveCell.ListObject.ListRows(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe ListRow : ListRows.Item, ListRows.Add et ListObject.ListRows

For Each

Voici un exemple de traitement des éléments ListRow dans une collection

Dim lstrw As ListRow
For Each lstrw In ActiveCell.ListObject.ListRows
	
Next lstrw

Delete

Cette méthode supprime les cellules de la liste et décale vers le haut les cellules restantes situées sous la ligne supprimée. Vous pouvez supprimer des lignes de la liste même si cette dernière est liée à un site SharePoint. La liste sur le site SharePoint n'est pas mise à jour, mais vous pouvez synchroniser les modifications.

ActiveCell.ListObject.ListRows(1).Delete

Index

Renvoie une valeur de type long qui représente le numéro d'index de l'objet ListRow au sein de la collection ListRows .

Dim lngIndex As Long
lngIndex = ActiveCell.ListObject.ListRows(1).Index

Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Range

Renvoie un objet Range qui représente la plage à laquelle s'applique l'objet de liste spécifié dans la liste.

Dim rngRange As Range
Set rngRange = ActiveCell.ListObject.ListRows(1).Range

ListRows.Add

Ajoute une nouvelle ligne au tableau représenté par l'objet ListObject spécifié.

Si position n'est pas spécifié, une nouvelle ligne du bas est ajoutée. Si AlwaysInsert n’est pas spécifié, les cellules situées sous le tableau sont décalées d’une ligne vers le bas (comme si la valeur était définie sur True).

Syntaxe : expression.Add (Position, AlwaysInsert)

Dim lstrw As ListRow
Set lstrw = ActiveCell.ListObject.ListRows.Add

Arguments

Les arguments suivants sont facultatifs

Position (Integer) - Spécifie la position relative de la nouvelle ligne.

AlwaysInsert (Boolean) - Indique si les données des cellules en dessous de la dernière ligne du tableau doivent toujours être décalées lorsqu'une nouvelle ligne est insérée, même si la ligne en dessous du tableau est vide. Si la valeur True est spécifiée, les cellules en dessous du tableau sont décalées d'une ligne vers le bas. Si la valeurest false, si la ligne située en dessous du tableau est vide, le tableau se développe pour occuper cette ligne sans décaler les cellules en dessous, mais si la ligne située en dessous du tableau contient des données, ces cellules seront déplacées lors de l'insertion de la nouvelle ligne.

ListRows.Count

Cette propriété renvoie une valeur Integer qui représente le nombre d'objets de la collection.

Dim lngCount As Long
lngCount = ActiveCell.ListObject.ListRows.Count

ListRows.Item

Cette méthode renvoie un seul objet d'une collection.

Syntaxe : expression.Item (Index)

Index: Nom ou numéro d'index de l'objet.

Dim lstrwItem As ListRow
Set lstrwItem = ActiveCell.ListObject.ListRows(Index:=1)

ListRows.Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.