ParagraphFormat.UseCharBasedFirstLineIndent property (Publisher)

Returns or sets an MsoTriState constant that specifies whether a paragraph is indented by using East Asian character width. Read/write.

Syntax

expression.UseCharBasedFirstLineIndent

expression A variable that represents a ParagraphFormat object.

Return value

MsoTriState

Remarks

The UseCharBasedFirstLineIndent property value can be one of the MsoTriState constants declared in the Microsoft Office type library.

The value of UseCharBasedFirstLineIndent can be set only if East Asian languages are enabled on the client computer, whereas the value can be returned regardless of whether East Asian languages are enabled. Note that UseCharBasedFirstLineIndent must be set before the CharBasedFirstLineIndent property can be returned or set. A run-time "permission denied" error is returned if UseCharBasedFirstLineIndent is not set first.

If UseCharBasedFirstLineIndent is msoTrue, the paragraph is indented by using East Asian character width, and if it is msoFalse, it is not. The default value is msoFalse.

Example

The following example creates a text box on the fourth page of the active publication. After the UseCharBasedFirstLineIndent property is set to True, the width of the first line indent is set to 15 points by using the CharBasedFirstLineIndent property. Font properties are then set, and text is inserted into the paragraph.

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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.