Clase ListColumns (Excel VBA)

Colección de todos los objetos ListColumn del objeto ListObject especificado. Para usar una variable de clase ListColumns, primero debe ser instanciado, por ejemplo

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

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos ListColumns en una colección.

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

Add

Agrega una nueva columna al objeto de lista.

Si no se especifica Position , se agrega una nueva columna en el extremo derecho.

Add (Position)

Position: Integer

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

Count

Devuelve un valor de tipo Integer que representa el número de objetos de la colección.

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

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Nombre o número de índice del objeto.

Dim lstcolItem As ListColumn
Set lstcolItem = ActiveCell.ListObject.ListColumns(Index:=1)