Question

我在使用Excel中的VBA为PowerPoint中的图表元素设置动画时遇到问题。我想做一些我可以在同一个图表上手动完成的事情，但是在尝试使用VBA时它并不起作用，尽管它来自MS站点的代码（此代码试图从PowerPoint VBE动画图表）窗口不是Excel）。

图表是从Excel复制的（默认的复制和粘贴功能，它没有链接到Excel），在PowerPoint中插入图表时会发生同样的错误。只是错误说它不是图表，尽管它和我说的一样，我能够手动设置图表元素的动画（系列或类别）。

因此，这里只是一部分关键代码（.ChartUnitEffect = ppAnimateByCategoryElements）。

我甚至从手动设置的形状（图表）中删除了动画，然后尝试使用VBA执行此操作，但得到了相同的错误消息。

我正在使用PowerPoint 2010和2013。

这有什么解决方法吗？

图表上还有一个文本框，它与系列一起动画，但顺序错误，想先为两个系列制作动画，然后用附加到图表的文本设置文本框（根据选择，它不是单独的形状窗格（只有2个形状，幻灯片标题和图表的文本框）。

我已经失去了很多时间尝试和搜索解决方案失败，所以我非常感谢您的帮助。

Sub Animate_Chart_Elements()
    With ActivePresentation.Slides(2).Shapes(2)
        With .AnimationSettings
            .EntryEffect = ppEffectFlyFromLeft
            .ChartUnitEffect = ppAnimateByCategoryElements
            .Animate = True
        End With
    End With
End Sub

错误显示＆＃34;抱歉，您无法在不是图表的对象上设置图表效果＆＃34;

尝试使用VBA在PowerPoint中为图表设置动画时出错

0 个答案: