WrapFormat オブジェクト (Publisher)

図形または図形範囲の周囲で折り返す文字列のすべてのプロパティを表します。

注釈

WrapFormat オブジェクトを取得するには、Shape.TextWrap プロパティを使用します。

例

次の使用例は、作業中の文書に楕円を追加し、楕円を囲む四角形の両側で文書の文字列を折り返すように設定します。 四角形の上端、下端、左端、および右端と文書の文字列との間隔を 0.1 インチ (2.5mm) に設定します。

Sub SetTextWrapFormatProperties() 
 Dim shpOval As Shape 
 
 Set shpOval = ActiveDocument.Pages(1).Shapes.AddShape(Type:=msoShapeOval, _ 
 Left:=36, Top:=36, Width:=100, Height:=35) 
 With shpOval.TextWrap 
 .Type = pbWrapTypeSquare 
 .Side = pbWrapSideBoth 
 .DistanceAuto = msoFalse 
 .DistanceTop = InchesToPoints(0.1) 
 .DistanceBottom = InchesToPoints(0.1) 
 .DistanceLeft = InchesToPoints(0.1) 
 .DistanceRight = InchesToPoints(0.1) 
 End With 
End Sub

プロパティ

• Application
• DistanceAuto
• DistanceBottom
• DistanceLeft
• DistanceRight
• DistanceTop
• Parent
• 側
• Type

関連項目

• Publisher オブジェクト モデル リファレンス

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

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