用VBA对PPT对象编程

在PowerPoint中,用VBA对PPT对象编程,欲通过对ActiveWindow.View.Slide.TimeLine.MainSequence(1).Behaviors.Add(msoAnimTypeMotion).MotionEffect.ByX 赋值,实现文本框的平滑滚动。
PPT播放时,文本框自动平滑移动,但是,只移动了一个页面宽度的距离后就自动停止了,没有移动到预设的位置。
请问:是什么原因?如何解决?
谢谢!

在PowerPoint中,如果想实现文本框的平滑滚动,需要在 VBA 中对 PPT 对象进行编程,并对 ActiveWindow.View.Slide.TimeLine.MainSequence 进行赋值。

如果 PPT 播放时,文本框只移动了一个页面宽度的距离后就自动停止了,没有移动到预设的位置,可能是因为动画设置不正确导致的。

为解决这个问题,您需要重新检查代码中的动画设置,确保已经正确地配置了移动的目标位置、速度等信息,再次进行测试。