Partager via


Propriété Font.AttachedToText (Publisher)

True si l’objet Font ou ParagraphFormat est attaché à un objet TextRange .

Si l'objet est attaché à un objet TextRange, le document est mis à jour lorsque les propriétés de l'objet sont modifiées. Si l'objet n'est pas attaché, rien dans le document n'est modifié tant que l'objet n'est pas appliqué à un objet TextRange ou Style. Boolean en lecture seule.

Syntaxe

expression. AttachedToText

Expression Variable qui représente un objet Font .

Exemple

Cet exemple montre comment dupliquer la mise en forme de la police . Il vérifie ensuite si la mise en forme dupliquée est attachée à une plage de texte et, si ce n’est pas le cas, elle attache la mise en forme à la deuxième forme.

Sub DuplicateText() 
 Dim fntTemp As Font 
 With ActiveDocument.Pages(1) 
 Set fntTemp = .Shapes(1).TextFrame.TextRange.Font.Duplicate 
 If fntTemp.AttachedToText <> True Then _ 
 ActiveDocument.Pages(1).Shapes(2) _ 
 .TextFrame.TextRange.Font = fntTemp 
 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.