Macro applying custom animation to chart does not record

[Guest]

In PowerPoint XP I find I cannot record a macro to apply a custom animation
(horizontal blinds) to a selected chart (or picture).

When I look at the code, there is nothing there. What am I doing wrong? Or
is it something that macros in PowerPoint XP won't do?

 

[Bill Foley]

First off - check your macro security (Tools/Macro/Security) and set it from
HIGH to MEDIUM.

Second - take a look at this FAQ because recorded macros in PowerPoint don't
always get you what you want since you record them in Edit mode and run them
in Slide Show mode:

http://www.rdpslides.com/pptfaq/FAQ00159.htm

 

[Steve Rindsberg]

In PowerPoint XP I find I cannot record a macro to apply a custom animation
(horizontal blinds) to a selected chart (or picture).

When I look at the code, there is nothing there. What am I doing wrong? Or
is it something that macros in PowerPoint XP won't do?

You're not doing anything wrong. The animation features in PPT changed
*radically* between 2000 and 2002/XP. The macro recorder still hasn't caught
up with it as of PPT2003; it draws a blank.

This does it the oldfashioned PPT2000 and before way but should work for you:

Sub JustToSpiteXP()
With ActiveWindow.Selection.ShapeRange.AnimationSettings
.Animate = msoTrue
.EntryEffect = ppEffectBlindsHorizontal
End With
End Sub

 

[Guest]

Thanks, but unfortunately this is not a solution.

Security has been set to LOW; this macro is for use in Normal mode, not
Slide Show mode. (It is not a particularly useful macro; it is asked for in
an ECDL Advanced example test paper!)