Propriété ParagraphFormat.UseCharBasedFirstLineIndent (Publisher)

Renvoie ou définit une constante MsoTriState qui spécifie si un paragraphe est mis en retrait à l’aide de la largeur des caractères d’Asie orientale. Lecture-écriture.

Syntaxe

expression. UseCharBasedFirstLineIndent

Expression Variable qui représente un objet ParagraphFormat .

Valeur renvoyée

MsoTriState

Remarques

La valeur de la propriété UseCharBasedFirstLineIndent peut être une des constantes MsoTriState déclarées dans la bibliothèque de type Microsoft Office.

La valeur de UseCharBasedFirstLineIndent ne peut être définie que si les langues d'Extrême-Orient sont activés sur l'ordinateur client, tandis que la valeur peut être renvoyée, les langues d'Asie orientale sont activés ou non. Notez que UseCharBasedFirstLineIndent doit être définie avant la propriété CharBasedFirstLineIndent peut être renvoyée ou définie. Une erreur d'exécution « autorisation refusée » est renvoyée si UseCharBasedFirstLineIndent n'est pas tout d'abord définie.

Si UseCharBasedFirstLineIndent a la valeur msoTrue, le paragraphe est mis en retrait à l’aide de la largeur des caractères d’Asie de l’Est, et s’il s’agit de msoFalse, ce n’est pas le cas. La valeur par défaut est msoFalse.

Exemple

L'exemple suivant crée une zone de texte sur la quatrième page de la composition active. Une fois que la propriété UseCharBasedFirstLineIndent est définie sur True, la largeur du retrait de la première ligne est définie à 15 points à l'aide de la propriété CharBasedFirstLineIndent. Les propriétés de police sont alors définies et texte est inséré dans le paragraphe.

Dim theTextBox As Shape 
 
Set theTextBox = ActiveDocument.Pages(4).Shapes _ 
 .AddShape(msoShapeRectangle, 100, 100, 300, 200) 
 
With theTextBox 
 .TextFrame.TextRange.ParagraphFormat _ 
 .UseCharBasedFirstLineIndent = msoTrue 
 .TextFrame.TextRange.ParagraphFormat _ 
 .CharBasedFirstLineIndent = 15 
 .TextFrame.TextRange.Font.Name = "Verdana" 
 .TextFrame.TextRange.Font.Size = 12 
 .TextFrame.TextRange.Text = "This is a test sentence." _ 
 & Chr(13) & "This is another test sentence." 
End With

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.