VBA to Change Object Action Settings

[Andibevan]

Hi,

Does anyone know what the vba would be to change the action settings of the
active object such that when it is clicked from within a presentation it
opens the item? (Other setting is edit)

Ta

Andi

 

[Steve Rindsberg]

Does anyone know what the vba would be to change the action settings of the

active object such that when it is clicked from within a presentation it
opens the item? (Other setting is edit)

My does PPT2003 ever twist its knickers when you record a macro and set the
Action to OPEN. Wow.

But you want something like this:

With ActiveWindow.Selection.ShapeRange.ActionSettings(ppMouseClick)
.ActionVerb = "OPEN" ' or "EDIT" or whatever
End With

 

[Andibevan]

Thanks Steve - I did manage to work it out myself with a bit of guessing.

You are completey right though - I personally have never seen an office
application record a macro that then has an error in it !! (no doubt there
are hundreds of places that this occurs that I have missed)

Ta

Andy

Does anyone know what the vba would be to change the action settings of the
active object such that when it is clicked from within a presentation it
opens the item? (Other setting is edit)

My does PPT2003 ever twist its knickers when you record a macro and set the
Action to OPEN. Wow.

But you want something like this:

With ActiveWindow.Selection.ShapeRange.ActionSettings(ppMouseClick)
.ActionVerb = "OPEN" ' or "EDIT" or whatever
End With