次の方法で共有


DropCap.LinesUp プロパティ (Publisher)

最初に削除された大文字が存在するテキスト行の上に発生する行数を表す長整数型 ( Long) の値を取得または設定します。 値の取得と設定が可能です。

構文

LinesUp

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

戻り値

Long

次の使用例は、高さが 5 行で元の行から 2 行上に移動するユーザー設定のドロップ キャップ文字を作成します。

Sub RaisedDropCap() 
 Dim intCount As Integer 
 With ActiveDocument.Pages(1).Shapes _ 
 .AddTextbox(Orientation:=pbTextOrientationHorizontal, _ 
 Left:=100, Top:=100, Width:=100, Height:=100) _ 
 .TextFrame.TextRange 
 For intCount = 1 To 10 
 .InsertAfter NewText:="This is a test. " 
 Next intCount 
 With .DropCap 
 .Size = 5 
 .LinesUp = 2 
 End With 
 End With 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。