vba - PowerPoint - VB 宏将 OnClick 动画添加到形状

Question

我正在使用 VB 宏生成按钮。我生成了很多按钮，每个按钮都有动作 - 转到幻灯片 xy。我想在单击这些按钮后以某种方式标记它们-例如将颜色更改为灰度的动画，或者只是简单地更改它们的背景颜色或删除它们-我只需要将这些按钮标记为已单击。我不知道如何做到这一点。我这样设定他们的目标：

With oshp.ActionSettings(ppMouseClick)
  .Action = ppActionHyperlink
  .Hyperlink.SubAddress = CStr(sldID) & "," & CStr(sldInd) & "," & sldTitle

如何在单击时向oshp（动作按钮）添加动画，或在单击时执行一些附加代码（例如按钮删除或背景颜色更改）？

标签： vbapowerpoint