Classe ListColumns (Excel VBA)

Collection de tous les objets ListColumn de l'objet ListObject spécifié. Pour utiliser une variable de classe ListColumns, elle doit d'abord être instanciée, par exemple

Dim lcs as ListColumns
Set lcs = ActiveCell.ListObject.ListColumns

For Each

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

Dim lstcol As ListColumn
For Each lstcol In ActiveCell.ListObject.ListColumns
	
Next lstcol

Add

Cette méthode ajoute une colonne à l'objet Liste.

Si position n'est pas spécifié, une nouvelle colonne située à l'extrême droite est ajoutée. Le nom d'une colonne est automatiquement généré. Le nom de la nouvelle colonne peut être modifié après l'ajout de la colonne.

Add (Position)

Position: Spécifie la position relative de la nouvelle colonne qui commence à 1. La colonne qui s'y trouvait avant est décalée vers l'extérieur.

Dim lstcol As ListColumn
Set lstcol = ActiveCell.ListObject.ListColumns.Add()

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.ListColumns.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 lstcolItem As ListColumn
Set lstcolItem = ActiveCell.ListObject.ListColumns(Index:=1)