用VBA在PPT中引用系统实时时间
我需要用VBA在PPT中引用系统实时时间。我是新手，不会操作，恳求大神们的帮助。谢谢！我的代码：
Sub start()
m = True
Do While m
DoEvents
ActiveWindow.Selection.SlideRange.Shapes("TextBox1").TextFrame.TextRange.Text = Format(TimeValue(Format(Now, "hh:mm:ss")))
Loop
End Sub
但是会提示错误，如图：
希望大神帮助！
页:
[1]