Partager via


Font.GetScriptName, méthode (Publisher)

Renvoie une chaîne qui représente le nom du script de police utilisé dans une plage de texte.

Syntaxe

expression. GetScriptName (Script)

Expression Variable qui représente un objet Font .

Parameters

Nom Requis/Facultatif Type de données Description
Script Requis PbFontScriptType Nom du script. Il peut s’agir de l’une des constantes PbFontScriptType déclarées dans la bibliothèque de type Microsoft Publisher.

Valeur renvoyée

String

Exemple

Cet exemple montre comment vérifier que le script de police par défaut utilisé pour la plage de texte spécifiée est Tahoma et, dans le cas contraire, le définir comme script de police par défaut.

Sub GetScript() 
 With ActiveDocument.Pages(1).Shapes(1) _ 
 .TextFrame.TextRange.Font 
 If .GetScriptName(Script:=pbFontScriptDefault) <> "Tahoma" Then 
 .SetScriptName Script:=pbFontScriptDefault, _ 
 FontName:="Tahoma" 
 End If 
 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.