GefObject.ExprListAnim (read-only property)

Gets the GefExprListAnim for the object.
Syntax: Set GefExprListAnim = object.ExprListAnim
Description: Returns Nothing if this property is not valid for the object.


Sub GefObject_ExprListAnim()
    Dim oCimObj As GefObject
    Dim oCimExprLstAnim As GefExprListAnim
    Set oCimObj = CimGetObject
    Set oCimExprLstAnim = oCimObj.ExprListAnim
    If oCimExprLstAnim Is Nothing Then
        MsgBox "This object does not support expression " & _
            "lists animations"
        MsgBox "This object does support expression " & _
            "lists animations"
    End If
End Sub