Columns.AutoFit, méthode (Word)
Modifie la largeur d’une colonne d’un tableau pour s’adapter à la largeur du texte sans modifier l’habillage de texte dans les cellules.
Syntaxe
expression. AutoFit
expression Obligatoire. Variable qui représente une collection « Columns ».
Remarques
Si le tableau a déjà une largeur équivalant à la distance qui sépare les marges gauche et droite, cette méthode n’a aucun effet.
Exemple
Cet exemple montre comment créer un tableau composé de trois lignes et trois colonnes dans un nouveau document et ensuite modifier la largeur de la première colonne en fonction de la largeur du texte.
Dim docNew as Document
Dim tableNew as Table
Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Range:=Selection.Range, _
NumRows:=3, NumColumns:=3)
With tableNew
.Cell(1,1).Range.InsertAfter "First cell"
.Columns(1).AutoFit
End With
Cet exemple montre comment créer un tableau composé de trois lignes et trois colonnes dans un nouveau document et ensuite modifier la largeur de toutes les colonnes en fonction de la largeur du texte.
Dim docNew as Document
Dim tableNew as Table
Set docNew = Documents.Add
Set tableNew = docNew.Tables.Add(Selection.Range, 3, 3)
With tableNew
.Cell(1,1).Range.InsertAfter "First cell"
.Cell(1,2).Range.InsertAfter "This is cell (1,2)"
.Cell(1,3).Range.InsertAfter "(1,3)"
.Columns.AutoFit
End With
Voir aussi
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.