GefObject.IndexColorAnim (read-only property)

Gets the GefIndexColorAnim for the object.

Syntax:

Set GefIndexColorAnim = object.IndexColorAnim

Description:

Returns Nothing if this property is not valid for the object.

Example:

Sub GefObject_IndexColorAnim()

Dim oCimObj As GefObject

    Dim oCimIndxClrAnim As
GefIndexColorAnim

Set oCimObj = CimGetObject

    Set oCimIndxClrAnim =
oCimObj.IndexColorAnim

    If oCimIndxClrAnim Is Nothing
Then

        MsgBox "The
object does not support index color " & _

"animations"
Else

        MsgBox "The
object does support index color " & _

            "animations"
    End If

End Sub