每次演示文稿点击第一张幻灯片时的 powerpoint 运行 宏
powerpoint run macro every time presentation hits first slide
我的 powerpoint 演示文稿 (2007) 中有一个宏 运行ning 来更新所有链接的 excel 数据。如果我手动 运行 宏，该宏将完美运行，但我试图在每次演示文稿返回到第一张幻灯片时自动将其设置为 运行。
我在这里查看了几个类似的问题后将以下代码放在一起，但它似乎不起作用。当我点击幻灯片 1 时没有任何反应。
Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
If SSW.View.CurrentShowPosition = 1 Then
Dim osld As Slide
Dim oshp As Shape
On Error Resume Next
For Each osld In ActivePresentation.Slides
For Each oshp In osld.Shapes
oshp.LinkFormat.update
Next oshp
Next osld
End If
End Sub
有人有什么想法吗？
您的代码似乎正确并且应该可以工作，但 PowerPoint 有时无法正确实现 OnSlideShowPageChange。
将 ActiveX 控件添加到幻灯片（甚至在幻灯片外）通常可以解决问题。
我的 powerpoint 演示文稿 (2007) 中有一个宏 运行ning 来更新所有链接的 excel 数据。如果我手动 运行 宏，该宏将完美运行，但我试图在每次演示文稿返回到第一张幻灯片时自动将其设置为 运行。
我在这里查看了几个类似的问题后将以下代码放在一起，但它似乎不起作用。当我点击幻灯片 1 时没有任何反应。
Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
If SSW.View.CurrentShowPosition = 1 Then
Dim osld As Slide
Dim oshp As Shape
On Error Resume Next
For Each osld In ActivePresentation.Slides
For Each oshp In osld.Shapes
oshp.LinkFormat.update
Next oshp
Next osld
End If
End Sub
有人有什么想法吗？
您的代码似乎正确并且应该可以工作，但 PowerPoint 有时无法正确实现 OnSlideShowPageChange。
将 ActiveX 控件添加到幻灯片（甚至在幻灯片外）通常可以解决问题。