Cells.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 « Cells ».

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

Objet de Collection de cellules

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.