Segments.AllExcluding

Function AllExcluding(IndexArray() As Variant) As SegmentRange

Member of Segments

The AllExcluding method returns a SegmentRange object that contains all segments (except for specified segments) from the Segments collection.

This function accepts a variable number of arguments. It also accepts arrays.

The following code example adds a node to the middle of each curve segment except the first three:

Sub Test() 
 Dim sgr As SegmentRange 
 Set sgr = ActiveShape.Curve.Segments.AllExcluding(1, 2, 3) 
 sgr.AddNode 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.