Partager via


TextStyles.Add, méthode (Publisher)

Ajoute un nouvel objet TextStyle à la collection TextStyles spécifiée et renvoie le nouvel objet TextStyle .

Syntaxe

expression. Add (StyleName, Font, ParagraphFormat, BasedOn)

Expression Variable qui représente un objet TextStyles .

Parameters

Nom Requis/Facultatif Type de données Description
StyleName Obligatoire Chaîne Nom du nouveau style de texte. Si ce nom est déjà utilisé pour un style de texte existant, ce dernier est remplacé.
Font Facultatif Font Paramètres de police à appliquer au nouveau style de texte.
ParagraphFormat Facultatif ParagraphFormat Mise en forme de paragraphe à appliquer au nouveau style de texte.
BasedOn Facultatif Chaîne Nom du style de texte sur lequel est bâti le nouveau style. Si ce nom ne correspond à aucun style existant, une erreur se produit.

Valeur renvoyée

TextStyle

Exemple

L’exemple suivant ajoute à la composition active un nouveau style de texte créé d’après le style Normal.

Dim tsNew As TextStyle 
 
Set tsNew = ActiveDocument.TextStyles _ 
 .Add(StyleName:="Title", BasedOn:="Normal")

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.