Propriedade ParagraphFormat.UseCharBasedFirstLineIndent (Publisher)

Retorna ou define uma constante MsoTriState que especifica se um parágrafo é recuado usando a largura do caractere do Leste Asiático. Leitura/gravação.

Sintaxe

expressão. UsarCharBasedFirstLineIndent

Expressão Uma variável que representa um objeto ParagraphFormat .

Valor de retorno

MsoTriState

Comentários

O valor da propriedade UseCharBasedFirstLineIndent pode ser uma das seguintes constantes MsoTriState declaradas na biblioteca de tipos do Microsoft Office.

O valor da UseCharBasedFirstLineIndent pode ser definido somente se idiomas do Leste Asiático estiverem habilitados no computador cliente, enquanto o valor pode ser retornado independentemente se idiomas do Leste Asiático estão habilitados. Observe que UseCharBasedFirstLineIndent deve ser definida antes da propriedade CharBasedFirstLineIndent pode ser retornada ou definida. Um erro em tempo de execução "permission denied" será retornado se UseCharBasedFirstLineIndent não for definida primeiro.

Se UseCharBasedFirstLineIndent for msoTrue, o parágrafo será recuado usando a largura do caractere do Leste Asiático e, se for msoFalse, não será. O valor padrão é msoFalse.

Exemplo

O exemplo a seguir cria uma caixa de texto na quarta página da publicação ativa. Depois que a propriedade UseCharBasedFirstLineIndent é definida como True, a largura do recuo da primeira linha é definida como 15 pontos usando a propriedade CharBasedFirstLineIndent. Propriedades de fonte, em seguida, são definidas e texto é inserido no parágrafo.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.