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.
Examples:
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