Object Model Reference : Classes : O : OutlineStyle : Properties : OutlineStyle.Index |
Property Index As Long
Member of OutlineStyle
The Index property returns the index number of a dash style in the OutlineStyles collection. If the outline style is not saved in the global style collection, this property returns -1.
The Index property returns a read-only value.
The following VBA example changes all dotted outlines to long-dashed outlines.
Sub Test() |
Dim s As Shape |
For Each s In ActivePage.Shapes |
If s.Outline.Type = cdrOutline Then |
If s.Outline.Style.Index = 1 Then |
s.Outline.Style = OutlineStyles(7) |
End If |
End If |
Next s |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.