Cells.PreferredWidthType (Word)

Cette propriété renvoie ou définit l'unité de mesure préférée à utiliser pour la largeur des cellules spécifiées. Les valeurs de retour possibles sont wdPreferredWidthAuto - Sélectionner automatiquement l'unité de mesure à utiliser, en fonction de la sélection en cours, wdPreferredWidthPercent - Mesurer la largeur de l'élément actif à l'aide d'un pourcentage spécifié, wdPreferredWidthPoints.

With ActiveDocument.Tables(1) 
 .PreferredWidthType = wdPreferredWidthPercent 
 .PreferredWidth = 50 
End With