Partager via


Objet TextColumns (Word)

Collection d'objets TextColumn qui représente toutes les colonnes de texte dans un document ou d'une section d'un document.

Remarques

Utilisez la propriété TextColumns pour renvoyer la collection TextColumns. L'exemple suivant met en forme les colonnes de la première section du document actif pour qu'elles soient égales, avec une ligne entre les colonnes.

With ActiveDocument.Sections(1).PageSetup.TextColumns 
 .EvenlySpaced = True 
 .LineBetween = True 
End With

Utilisez la méthode Add pour ajouter une colonne à la collection de colonnes. Par défaut, il est une colonne de texte dans la collection TextColumns. L'exemple suivant ajoute une colonne de 2,5 pouces de large au document actif.

ActiveDocument.PageSetup.TextColumns.Add _ 
 Width:=InchesToPoints(2.5), _ 
 Spacing:=InchesToPoints(0.5), EvenlySpaced:=False

Utilisez la méthode SetCount pour disposer le texte en colonnes. L'exemple suivant réorganise le texte du document actif en trois colonnes.

ActiveDocument.PageSetup.TextColumns.SetCount NumColumns:=3

Voir aussi

Référence du modèle objet Word

Assistance et commentaires

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.