|
|
我需要用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
但是会提示错误，如图：
希望大神帮助！
Slide1.cls.zip
(424 Bytes, 下载次数: 80)
|
|
