Builds a freeform object. Returns a object that represents the freeform as it is being built. Use the method to add segments to the freeform. After you have added at least one segment to the freeform, you can use the method to convert the FreeformBuilder object into a object that has the geometric description you've defined in the FreeformBuilder object.

Syntax

expression.BuildFreeform(EditingType, X1, Y1)

expression A variable that represents a Shapes object.

Parameters

Name Required/Optional Data Type Description
EditingType Required The editing property of the first node.
X1 Required Single The horizontal position, measured in points, of the first node in the freeform drawing relative to the left edge of the slide.
Y1 Required Single The vertical position, measured in points, of the first node in the freeform drawing relative to the top edge of the slide.

Return Value
FreeformBuilder

Example

This example adds a freeform with four segments to myDocument.

Visual Basic for Applications 
Set myDocument = ActivePresentation.Slides(1) With myDocument.Shapes.BuildFreeform(EditingType:=msoEditingCorner, _ X1=360, Y1=200) .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingCorner, _ X1:=380, Y1:=230, X2:=400, Y2:=250, X3:=450, Y3:=300 .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingAuto, _ X1:=480, Y1:=200 .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _ X1:=480, Y1:=400 .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _ X1:=360, Y1:=200 .ConvertToShape End With
120 build freeform Build Freeform Method BuildFreeform buildfreeform method Define a nonstandard shape? Draw freeform? ppv ppv120 Produce a freeform shape?

See also: