Classe ListRows (Excel VBA)
Collection de tous les objets ListRow de l'objet ListObject spécifié. Pour utiliser une variable de classe ListRows, elle doit d'abord être instanciée, par exemple
Dim lrs as ListRows
Set lrs = ActiveCell.ListObject.ListRows
For Each
Voici un exemple de traitement des éléments ListRows dans une collection
Dim lstrw As ListRow
For Each lstrw In ActiveCell.ListObject.ListRows
Next lstrw
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).
Add (Position, AlwaysInsert)
Dim lstrw As ListRow
Set lstrw = ActiveCell.ListObject.ListRows.Add
Arguments
Optional 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.
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
Item
Cette méthode renvoie un seul objet d'une collection.
Item (Index)
Index: Nom ou numéro d'index de l'objet.
Dim lstrwItem As ListRow
Set lstrwItem = ActiveCell.ListObject.ListRows(Index:=1)