title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
FreeformBuilder.ConvertToShape method (Excel) |
vbaxl10.chm648074 |
|
|
2084277d-7e6a-5675-8e46-17522c3228eb |
04/26/2019 |
medium |
Creates a shape that has the geometric characteristics of the specified FreeformBuilder object. Returns a Shape object that represents the new shape.
expression.ConvertToShape
expression A variable that represents a FreeformBuilder object.
Shape
You must apply the AddNodes method to a FreeformBuilder object at least once before you use the ConvertToShape method.
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
[!includeSupport and feedback]