Shapes.AddLine メソッド (Publisher)
指定した Shapes コレクションに線を表す新しい Shape オブジェクトを追加します。
構文
式。AddLine (BeginX、 BeginY、 EndX、 EndY)
表現Shapes オブジェクトを表す変数です。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| BeginX | 必須 | バリアント型 (Variant) | 線の始点の x 軸座標を指定します。 |
| BeginY | 必須 | バリアント型 (Variant) | 線の始点の y 軸座標を指定します。 |
| EndX | 必須 | バリアント型 (Variant) | 線の終点の x 軸座標を指定します。 |
| EndY | 必須 | バリアント型 (Variant) | 線の終点の y 軸座標を指定します。 |
戻り値
Shape
注釈
BeginX、BeginY、EndX、EndY の各引数の場合、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。
例
次の使用例は、作業中の文書の先頭ページに新しい線を追加します。
Dim shpLine As Shape
Set shpLine = ActiveDocument.Pages(1).Shapes.AddLine _
(BeginX:=144, BeginY:=144, _
EndX:=180, EndY:=72)
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。