Returns a DropCap object that represents a dropped capital letter for the paragraphs in the specified text frame.
expression.DropCap
expression Required. An expression that returns one of the objects in the Applies To list.
This example applies a custom dropped capital that is three lines high and spans the first three characters of each paragraph in the specified text frame.
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