Shapes.AddLine メソッド (Excel)Shapes.AddLine method (Excel)

Shapesオブジェクトに適用されるので、ワークシートの新しい線を表す**Shape** オブジェクトを返します。As it applies to the Shapes object, returns a Shape object that represents the new line on a worksheet.

構文Syntax

Addline([Beginx][beginy][endx][endy])expression.AddLine (BeginX, BeginY, EndX, EndY)

表現 Shapes オブジェクトを表す変数です。expression A variable that represents a Shapes object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
BeginXBeginX 必須Required SingleSingle 文書の左上隅を基準に線の始点の位置をポイント単位で指定します。The position (in points) of the line's starting point relative to the upper-left corner of the document.
BeginYBeginY 必須Required SingleSingle 文書の左上隅を基準に線の終点の位置をポイント単位で指定します。The position (in points) of the line's starting point relative to the upper-left corner of the document.
EndXEndX 必須Required SingleSingle 文書の左上隅を基準に線の終点の位置をポイント単位で指定します。The position (in points) of the line's end point relative to the upper-left corner of the document.
EndYEndY 必須Required SingleSingle 文書の左上隅を基準に線の終点の位置をポイント単位で指定します。The position (in points) of the line's end point relative to the upper-left corner of the document.

戻り値Return value

ShapeShape

Example

次の使用例は、myDocument に青色の点線を追加します。This example adds a blue dashed line to myDocument.

Set myDocument = Worksheets(1) 
With myDocument.Shapes.AddLine(10, 10, 250, 250).Line 
 .DashStyle = msoLineDashDotDot 
 .ForeColor.RGB = RGB(50, 0, 128) 
End With

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.