Поделиться через

Свойство TextRange.DropCap (Publisher)

  • Статья

Возвращает объект DropCap , представляющий удаленную прописную букву для абзацев в указанном текстовом фрейме.

Синтаксис

expression. DropCap

Выражение Переменная, представляющая объект TextRange .

Возвращаемое значение

DropCap

Пример

В этом примере применяется пользовательская заглавная буква, которая имеет высоту в три строки и охватывает первые три символа каждого абзаца в указанном текстовом фрейме.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.