TextRange.DropCap property (Publisher)

Returns a DropCap object that represents a dropped capital letter for the paragraphs in the specified text frame.



expression A variable that represents a TextRange object.

Return value



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

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.