Partager via


Propriété ParagraphFormat.CharBasedFirstLineIndent (Publisher)

Cette propriété renvoie ou définit la valeur de retrait de la première ligne (dans la largeur des caractères d'Asie orientale). Long (en lecture/écriture).

Syntaxe

expression. CharBasedFirstLineIndent

Expression Variable qui représente un objet ParagraphFormat .

Valeur renvoyée

Entier long

Remarques

La valeur de CharBasedFirstLineIndent peut être retournée ou définie uniquement après la définition de la propriété UseCharBasedFirstLineIndent . Une erreur d'exécution « autorisation refusée » est renvoyée si UseCharBasedFirstLineIndent n'est pas tout d'abord définie.

Remarque

UseCharBasedFirstLineIndent peut être défini uniquement si les langues d’Asie de l’Est sont activées sur l’ordinateur client (la valeur peut être retournée, que les langues d’Asie de l’Est soient ou non activées). Par conséquent, CharBasedFirstLineIndent ne peut être utilisé que si les langues d'Asie de l'Est sont activées sur l'ordinateur client.

La valeur de CharBasedFirstLineIndent peut être comprise entre 0 (zéro) et 80.

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 a la valeur True, la largeur du premier retrait de ligne est définie sur 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.