次の方法で共有


TextRange.DropCap プロパティ (Publisher)

指定したテキスト ボックスの段落のドロップ キャップを表す DropCap オブジェクトを取得します。

構文

DropCap

TextRange オブジェクトを表す変数。

戻り値

DropCap

次の使用例は、高さ 3 行で長さ 3 文字分のユーザー設定のドロップ キャップを、指定したテキスト ボックスの各段落の先頭に適用します。

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 のサポートおよびフィードバックを参照してください。