Compartilhar via


Propriedade TextRange.DropCap (Publisher)

Retorna um objeto DropCap que representa um letra capitular para os parágrafos do quadro de texto especificado.

Sintaxe

expressão. DropCap

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

Valor de retorno

DropCap

Exemplo

Este exemplo aplica uma letra capitular personalizada que tem três linhas de altura e espaça os primeiros três caracteres de cada parágrafo no quadro de texto especificado.

Sub SetDropCap() 
 With ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange 
 .DropCap.ApplyCustomDropCap FontName:="Snap ITC", _ 
 Bold:=True, Size:=3, Span:=3 
 With .ParagraphFormat 
 .SpaceBefore = 6 
 .SpaceAfter = 6 
 End With 
 End With 
End Sub

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.