Classe ListColumn - une colonne dans un tableau (Excel VBA)

Cet objet représente une colonne dans un tableau.

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

Dim lstcol as ListColumn
Set lstcol = ActiveCell.ListObject.ListColumns(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe ListColumn : ListColumns.Add et ListColumns.Item.

For Each

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

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

DataBodyRange

Renvoie un objet Range qui représente la taille de la partie données d'une colonne. En lecture seule.

L'objet renvoyé exclut les cellules En-tête et Totaux.

Dim rngDataBodyRange As Range
Set rngDataBodyRange = ActiveCell.ListObject.ListColumns(1).DataBodyRange

Delete

Cette méthode supprime la colonne de données dans la liste.

Cette méthode ne supprime pas la colonne de la feuille. Si la liste est liée à un site Microsoft SharePoint Foundation, il est impossible de supprimer la colonne du serveur et une erreur se produit.

ActiveCell.ListObject.ListColumns(1).Delete

Index

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

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

Name

Cette propriété renvoie ou définit une valeur de type String qui représente la colonne de liste.

Elle s'utilise également comme nom complet de la colonne de liste. Ce nom doit être unique dans la liste.

ActiveCell.ListObject.ListColumns(1).Name =

Range

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

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

Total

Renvoie la ligne Total d'un objet ListColumn. En lecture seule.

Dim rngTotal As Range
Set rngTotal = ActiveCell.ListObject.ListColumns(1).Total

TotalsCalculation

Détermine le type de calcul dans la ligne totaux de la colonne de liste en fonction de la valeur de l'énumération XlTotalsCalculation . Lecture-écriture. Ici on trouve valeurs possible pour XlTotalsCalculation.

La ligne totaux n'a pas besoin d'être visible pour définir cette propriété. Cette dernière ne possède pas de valeur par défaut. Excel peut modifier l'état de cette propriété à mesure que d'autres colonnes sont ajoutées ou supprimées.

ActiveCell.ListObject.ListColumns(1).TotalsCalculation = xlTotalsCalculationAverage

XPath

Renvoie un objet XPath qui représente le XPath de l’élément mappé à l’objet Range spécifié. Le contexte de la plage détermine si l’action réussit ou renvoie un objet vide. En lecture seule.

La propriété XPath est valide lorsque la plage qu’elle contient remplit les conditions suivantes:

Dim xphXPath As XPath
Set xphXPath = ActiveCell.ListObject.ListColumns(1).XPath