Item Method (ActionSettings Collection)
Applies To
ActionSettings collection object.
Description
Returns a single member of a collection of action settings.
Syntax
expression.Item(Index)
expression Required. An expression that returns an ActionSettings collection.
Index Required Long. Specifies which of the following two settings is to be returned: the action setting for when the mouse pointer is positioned over the specified shape, or the action setting for when the user clicks the shape. Can be either of the following PpMouseActivation constants: ppMouseClick or ppMouseOver.
Example
This example sets the foreground color to red for the shape named "Rectangle 1" on slide one in the active presentation.
ActivePresentation.Slides.Item(1).Shapes.Item("rectangle 1").Fill _
.ForeColor.RGB = RGB(128, 0, 0)
This example sets shape three on slide one to play the sound of applause when it's clicked during a slide show and specifies that the shape's color be momentarily inverted whenever the mouse pointer passes over the shape during a slide show.
With ActivePresentation.Slides.Item(1).Shapes.Item(3) _
.ActionSettings.Item(ppMouseClick)
.SoundEffect.Name = "applause.wav"
.AnimateAction = True
End With
This example sets the first-line indent and the hanging indent for outline level one in body text on the slide master for the active presentation.
With ActivePresentation.SlideMaster.TextStyles.Item(ppBodyStyle)
With .Ruler.Levels.Item(1) ' sets indents for level 1
.FirstMargin = 9
.LeftMargin = 54
End With
End With
This example hides all slides in the active presentation that don't have the value "east" for the "region" tag.
For Each s In ActivePresentation.Slides
If s.Tags.Item("region") <> "east" Then
s.SlideShowTransition.Hidden = True
End If
Next