Classe Column (Word VBA)

La classe Column représente une colonne de table unique.

Les procédures principales de la classe Column sont Delete, Select, Columns.Add, Columns.Delete et Columns.Select

Set

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

Dim clm as Column
Set clm = ActiveDocument.Range.Columns(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Column : Cell.Column, Next, Previous, Columns.Add, Columns.Item, Columns.First, Columns.Last, Range.Columns, Selection.Columns et Table.Columns

For Each

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

Dim clm As Column
For Each clm In ActiveDocument.Range.Columns
	
Next clm

Méthodes

Les méthodes principales de la classe Column sont

Delete - Supprime la colonne spécifiée.

ActiveDocument.Range.Columns(1).Delete

Select - Sélectionne la colonne de tableau spécifiée.

ActiveDocument.Range.Columns(1).Select

Columns.Add - Renvoie un objet Column qui représente une colonne ajoutée à un tableau.

Dim clm As Column
Set clm = ActiveDocument.Range.Columns.Add()

Columns.Delete - Supprime les colonnes spécifiées.

ActiveDocument.Range.Columns.Delete

Columns.Select - Sélectionne les colonnes du tableau spécifiées.

ActiveDocument.Range.Columns.Select

Autre Méthodes

SetWidth - Définit la largeur d'une colonne d'un tableau.

ActiveDocument.Range.Columns(1).SetWidth ColumnWidth:=, RulerStyle:=wdAdjustFirstColumn

Sort - Trie le contenu de la colonne de tableau spécifiée.

ActiveDocument.Range.Columns(1).Sort

Columns.SetWidth - Définit la largeur des colonnes d'un tableau.

ActiveDocument.Range.Columns.SetWidth ColumnWidth:=, RulerStyle:=wdAdjustFirstColumn

Propriétés

Borders Renvoie une collection Borders qui représente la totalité des bordures de l’objet spécifié.

ActiveDocument.Range.Columns(1).Borders =

Cells Renvoie une collection Cells qui représente les cellules de tableau d’une colonne de tableau.

Dim cllsCells As Cells
Set cllsCells = ActiveDocument.Range.Columns(1).Cells

Index Renvoie un type long qui représente la position d'un élément dans une collection.

Dim lngIndex As Long
lngIndex = ActiveDocument.Range.Columns(1).Index

IsFirst True si la ligne ou la colonne spécifiée est la première du tableau.

Dim booIsFirst As Boolean
booIsFirst = ActiveDocument.Range.Columns(1).IsFirst

IsLast True si la ligne ou la colonne spécifiée est la dernière du tableau.

Dim booIsLast As Boolean
booIsLast = ActiveDocument.Range.Columns(1).IsLast

NestingLevel Renvoie le niveau d'imbrication de la colonne spécifiée.

Dim lngNestingLevel As Long
lngNestingLevel = ActiveDocument.Range.Columns(1).NestingLevel

Next Renvoie la colonne suivante dans une collection de colonnes de tableau.

Dim clmNext As Column
Set clmNext = ActiveDocument.Range.Columns(1).Next

Parent Renvoie un Object qui représente l'objet parent de l'objet Column spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Columns(1).Parent

PreferredWidth Cette propriété renvoie ou définit la largeur préférée (en points ou en pourcentage de la largeur de la fenêtre) pour la colonne spécifiée.

ActiveDocument.Range.Columns(1).PreferredWidth =

PreferredWidthType Cette propriété renvoie ou définit l'unité de mesure préférée à utiliser pour la largeur de la colonne de tableau spécifiée.

ActiveDocument.Range.Columns(1).PreferredWidthType = wdPreferredWidthAuto

Previous Renvoie la colonne précédente dans une collection de colonnes de tableau.

Dim clmPrevious As Column
Set clmPrevious = ActiveDocument.Range.Columns(1).Previous

Shading Renvoie un objet Shading qui représente la mise en forme de la trame de fond pour la colonne spécifiée.

Dim shdShading As Shading
Set shdShading = ActiveDocument.Range.Columns(1).Shading

Width Cette propriété renvoie ou définit la largeur de la colonne spécifiée, en points.

ActiveDocument.Range.Columns(1).Width =

Columns.Borders Renvoie une collection Borders qui représente la totalité des bordures des colonnes spécifiées.

ActiveDocument.Range.Columns.Borders =

Columns.Count Renvoie un type long qui représente le nombre de colonnes dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.Range.Columns.Count

Columns.First Renvoie un objet Column qui représente le premier élément de la collection Columns .

Dim clmFirst As Column
Set clmFirst = ActiveDocument.Range.Columns.First

Columns.Last Renvoie un objet Column qui représente la dernière colonne d'un tableau.

Dim clmLast As Column
Set clmLast = ActiveDocument.Range.Columns.Last

Columns.NestingLevel Renvoie le niveau d'imbrication des colonnes spécifiées.

Dim lngNestingLevel As Long
lngNestingLevel = ActiveDocument.Range.Columns.NestingLevel

Columns.Parent Renvoie un Object qui représente l’objet parent de l’objet Columns spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Columns.Parent

Columns.PreferredWidth Cette propriété renvoie ou définit la largeur préférée (en points ou en pourcentage de la largeur de la fenêtre) pour les colonnes spécifiées.

ActiveDocument.Range.Columns.PreferredWidth =

Columns.PreferredWidthType Cette propriété renvoie ou définit l'unité de mesure préférée à utiliser pour la largeur du tableau, colonnes ou cellules spécifiées.

ActiveDocument.Range.Columns.PreferredWidthType = wdPreferredWidthAuto

Columns.Shading Renvoie un objet Shading qui représente la mise en forme de la trame de fond pour les colonnes de tableau spécifiées.

Dim shdShading As Shading
Set shdShading = ActiveDocument.Range.Columns.Shading

Columns.Width Cette propriété renvoie ou définit la largeur des colonnes spécifiées, en points.

ActiveDocument.Range.Columns.Width =