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

フリーフォーム オブジェクトを作成します。Builds a freeform object. 作成されたフリーフォームを表す FreeformBuilder オブジェクトを返します。Returns a FreeformBuilder object that represents the freeform as it is being built.

フリー フォームにセグメントを追加するのには、 AddNodes メソッドを使用します。Use the AddNodes method to add segments to the freeform. フリーフォームに少なくとも1つのセグメントを追加した後、 Converttoshape メソッドを使用すると、 freeformbuilderオブジェクトを、 指定された幾何学的な説明を含む Shape オブジェクトに変換できます。FreeformBuilderオブジェクト。After you have added at least one segment to the freeform, you can use the ConvertToShape method to convert the FreeformBuilder object into a Shape object that has the geometric description that you have defined in the FreeformBuilder object.

構文Syntax

Buildfreeform フォーム(編集の種類X1Y1)expression.BuildFreeform (EditingType, X1, Y1)

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

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
EditingTypeEditingType 必須Required MsoEditingTypeMsoEditingType 最初の節点の編集プロパティを指定します。The editing property of the first node.
X1X1 必須Required SingleSingle 文書の左上隅を基準にして、フリーフォームの最初の節点の位置をポイント単位で指定します。The position (in points) of the first node in the freeform drawing relative to the upper-left corner of the document.
Y1Y1 必須Required SingleSingle 文書の左上隅を基準にフリーフォームの最初の節点の位置をポイント単位で指定します。The position (in points) of the first node in the freeform drawing relative to the upper-left corner of the document.

戻り値Return value

FreeformBuilderFreeformBuilder

Example

次の使用例は、5 つの頂点を持つフリーフォームを myDocument に追加します。This example adds a freeform with five vertices to myDocument.

Set myDocument = Worksheets(1) 
With myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200) 
    .AddNodes msoSegmentCurve, msoEditingCorner, _ 
        380, 230, 400, 250, 450, 300 
    .AddNodes msoSegmentCurve, msoEditingAuto, 480, 200 
    .AddNodes msoSegmentLine, msoEditingAuto, 480, 400 
    .AddNodes msoSegmentLine, msoEditingAuto, 360, 200 
    .ConvertToShape 
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.