多个对象![]() ![]() ![]() ![]() ![]() |
包含两个 ActionSetting 对象的集合,这些对象用于形状或文本范围。其中一个 ActionSetting 对象代表幻灯片放映中用户单击指定对象时的反应;另一个 ActionSetting 对象代表幻灯片放映中用户将鼠标移过指定对象时的反应。
使用 ActionSettings 属性返回 ActionSettings 集合。使用 ActionSettings(index) 返回单个 ActionSetting 对象,其中 index 是 ppMouseClick 或 ppMouseOver。以下示例指定幻灯片放映中鼠标移过某形状时执行宏“CalculateTotal”。
With ActivePresentation.Slides(1).Shapes(3) _
.ActionSettings(ppMouseOver)
.Action = ppActionRunMacro
.Run = "CalculateTotal"
.AnimateAction = True
End With