GefMoveAnim (object)

Represents the attributes of horizontal and vertical move animation on an object.
Description: The GefMoveAnim object represents the attributes of horizontal or vertical move animation on an object.

Example:

Sub GefMoveAnim_HorizontalAttrib()
    
    Dim oCimObj As GefObject
    Dim oCimMoveAnim As GefMoveAnim
    Dim oCimMoveAnimAttrib As GefMoveAnimAttrib
    Dim oCimExecCond As GefExecutionCondition
    
    Set oCimObj = CimGetObject
    Set oCimMoveAnim = oCimObj.MoveAnim
    If Not oCimMoveAnim Is Nothing Then
        Set oCimMoveAnimAttrib = oCimMoveAnim.HorizontalAttrib
        If Not oCimMoveAnimAttrib Is Nothing Then
            Set oCimExecCond = oCimMoveAnimAttrib.SliderActionCondition
            If Not oCimExecCond Is Nothing Then
                MsgBox "The expression is " & _
                    oCimExecCond.Expression
            End If
        End If
    End If
    
End Sub
Properties: Application , HorizontalAttrib , Parent , VerticalAttrib
Methods: