Objet Column (Word)
Représente une colonne de table unique. L'objet Column est membre des colonnes collection. La collection Columns comprend toutes les colonnes dans un tableau, la sélection ou la plage.
Utilisez Columns (Index), où Index est le numéro d'index, pour renvoyer un seul objet Column. Le numéro d'index représente la position de la colonne dans la collection Columns (en partant de la gauche).
L'exemple suivant montre comment sélectionner la première colonne du premier tableau dans le document actif.
ActiveDocument.Tables(1).Columns(1).Select
Utilisez la colonne propriété avec un objet Cell pour renvoyer un objet Column. L'exemple suivant supprime le texte dans la cellule 1, insère le nouveau texte, puis trie la colonne entière.
With ActiveDocument.Tables(1).Cell(1, 1)
.Range.Delete
.Range.InsertBefore "Sales"
.Column.Sort
End With
Utilisez Ajouter méthode pour ajouter une colonne à un tableau. L'exemple suivant ajoute une colonne au premier tableau du document actif, puis il rend la largeur des colonnes égale.
If ActiveDocument.Tables.Count >= 1 Then
Set myTable = ActiveDocument.Tables(1)
myTable.Columns.Add BeforeColumn:=myTable.Columns(1)
myTable.Columns.DistributeWidth
End If
Remarques
Utilisez les informations propriété avec un objet Selection pour renvoyer le numéro de colonne en cours. L'exemple suivant sélectionne la colonne active, puis affiche le nombre de colonnes dans une boîte de message.
If Selection.Information(wdWithInTable) = True Then
Selection.Columns(1).Select
MsgBox "Column " _
& Selection.Information(wdStartOfRangeColumnNumber)
End If
Nom |
---|
Application |
Borders |
Cells |
Creator |
Index |
IsFirst |
IsLast |
NestingLevel |
Next |
Parent |
PreferredWidth |
PreferredWidthType |
Previous |
Shading |
Width |
Référence du modèle objet Word
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.