The Closed property returns or specifies whether a curve's subpath is open or closed. If this property is set to True, the subpath is closed, and an enclosure is formed by connecting the path's starting and ending points.
Examples:
The following VBA example closes all subpaths in the selected curve.
Sub Test()
Dim spath As SubPath
For Each spath In ActiveShape.Curve.Subpaths
spath.Closed = True
Next spath
End Sub