Partager via


Propriété TextFrame.AutoFitText (Publisher)

Définit ou renvoie une constante PbTextAutoFitType qui représente la façon dont Microsoft Publisher ajuste automatiquement la taille de police du texte et la taille de l’objet TextFrame pour optimiser l’affichage. Lecture-écriture.

Syntaxe

expression. Ajustement automatique du texte

Expression Variable qui représente un objet TextFrame .

Valeur renvoyée

PbTextAutoFitType

Remarques

La valeur de la propriété AutoFitText peut être l’une des constantes PbTextAutoFitType déclarées dans la bibliothèque de type Microsoft Publisher.

Exemple

L'exemple suivant vérifie si le cadre de texte comporte du texte, et si c'est le cas, la propriété AutoFitText est définie pour tenir au mieux.

Sub TextFit() 
 
 Dim tfFrame As TextFrame 
 
 tfFrame = Application.ActiveDocument.MasterPages.Item(1).Shapes(1).TextFrame 
 With tfFrame 
 If .HasText = msoTrue Then .AutoFitText = pbTextAutoFitBestFit 
 End With 
 
End Sub

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.