Effects.Count

Property Count As Long

Member of Effects

The Count property returns the number of effects in the Effects collection.

The Count property returns a read-only value.

The following code example selects the first shape to which an effect is applied:

Sub Test() 
 Dim s As Shape 
 For Each s In ActivePage.Shapes 
  If s.Effects.Count <> 0 Then 
   s.CreateSelection 
   Exit For 
  End If 
 Next s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.