Propriété PageSetup.TextColumns (Word)

  • Article

Renvoie une collection TextColumns qui représente l'ensemble des colonnes de texte de l'objet PageSetup spécifié.

Syntaxe

expression. TextColumns

Expression Expression qui renvoie un objet PageSetup .

Remarques

La collection contient toujours au moins une colonne de texte. Si vous créez des colonnes de texte, vous les ajoutez dans une collection d'une colonne.

Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.

Exemple

Cet exemple montre comment créer dans la deuxième section du document actif quatre colonnes de texte espacées à intervalle régulier.

With ActiveDocument.Sections(2).PageSetup.TextColumns 
 .SetCount NumColumns:=3 
 .Add EvenlySpaced:=True 
End With

Cet exemple montre comment créer un document constitué de deux colonnes de texte. La largeur de la première colonne est égale à 1,5 pouces (4 centimètres) et celle de la seconde est égale à 3 pouces (7,5 centimètres).

Set myDoc = Documents.Add 
With myDoc.PageSetup.TextColumns 
 .SetCount NumColumns:=1 
 .Add Width:=InchesToPoints(3) 
End With 
With myDoc.PageSetup.TextColumns(1) 
 .Width = InchesToPoints(1.5) 
 .SpaceAfter = InchesToPoints(0.5) 
End With

Voir aussi

Objet PageSetup

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.