VBA to remove ppEffectDissolve?

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Geoff Cox - 22 Oct 2006 12:33 GMT

Hello,

I have previously applied following to some action buttons

oSh.AnimationSettings.EntryEffect = ppEffectDissolve

How do I now remove this effect?

Thanks

Geoff

Reply to this Message

Geoff Cox - 22 Oct 2006 21:53 GMT

>Hello,
>
[quoted text clipped - 3 lines]
>
>How do I now remove this effect?

I have tried following but it does not work? Where am I wrong?!

For Each oSh In oSl.Shapes
    If oSh.Type = 1 Then
        If oSh.AutoShapeType = 129 Then
            If oSh.AnimationSettings.EntryEffect = _
            ppEffectDissolve Then
            oSh.AnimationSettings.Animate = msoFalse
            End If
        End If
    End If
Next oSh
Next oSl

Cheers

Geoff

PS I know I ought to use the TimeLine object but would like to get
this to work first.

>Thanks
>
>Geoff

Reply to this Message