☰

如何在动画中更改文本框中的 Powerpoint 文本

tag-icon • tag-icon windows-10 microsoft-powerpoint microsoft-powerpoint-2016
如何在动画中更改文本框中的 Powerpoint 文本

当动画开始播放时，如何更改文本框内的文本？

对于一些学生的毕业，我们希望他们的照片和姓名能够出现在一张纸上。

答案1

我们可以使用宏来改变演示文稿中的文本。

ActivePresentation.Slides(1).Shapes("Name Placeholder").TextFrame.TextRange = "John"

我们可以使用多个类似上述的宏，并将其与动画同步。

Dim time As Date
time = Now()

Dim count As Integer
time = DateAdd("s", 5, time) '5 refers to the seconds

Do Until time < Now()
DoEvents
If time < Now() Then

ActivePresentation.Slides(1).Shapes("Name Placeholder").TextFrame.TextRange = "John"

End If
Loop

相关内容