嘿，我来帮你搞定这个PPT放映时的旧数据闪烁问题！先给你拆解下背后的原因，再给几个实用的解决方案：

PowerPoint进入放映模式后，会把当前幻灯片的所有内容（包括你链接的Excel数据）加载到内存缓存里，切换幻灯片时直接读缓存来快速渲染，避免反复读取文件。这就是你更新链接并保存后，切换回去还是闪旧数据的核心原因——放映时用的是缓存里的老内容，没实时读取刚保存的新数据。

方案1：修改VBA，强制刷新当前幻灯片缓存 #

你现有的代码是更新整个演示文稿的链接，但可以针对当前显示的幻灯片做精准刷新，直接覆盖缓存里的旧内容。把你的模块1代码改成这样：

Sub SlideShowNextSlide(ByVal Wn As SlideShowWindow)
    ' 先更新所有链接
    ActivePresentation.UpdateLinks
    
    ' 强制当前幻灯片的所有形状（包括Excel链接对象）刷新数据
    Dim currentSlide As Slide
    Set currentSlide = Wn.View.Slide
    currentSlide.Shapes.Range.Refresh
    
    ' 保存演示文稿
    With Application.ActivePresentation
        If Not .Saved And .Path <> "" Then .Save
    End With
End Sub

Sub OnSlideShowPageChange(ByVal objWindow As SlideShowWindow)
    ActivePresentation.UpdateLinks
    
    Dim currentSlide As Slide
    Set currentSlide = objWindow.View.Slide
    currentSlide.Shapes.Range.Refresh
    
    With Application.ActivePresentation
        If Not .Saved And .Path <> "" Then .Save
    End With
End Sub

Shapes.Range.Refresh这个方法会让幻灯片上的所有元素重新从数据源拉取最新数据，直接更新放映时的缓存，应该能解决闪烁问题。

方案2：关闭硬件加速试试 #

有时候闪烁不是缓存的锅，是硬件加速导致的渲染延迟。你可以这么操作：

• 打开PowerPoint的「选项」→ 「高级」→ 「显示」
• 取消勾选「禁用硬件图形加速」（注意是取消，也就是关闭硬件加速）
• 重启PowerPoint后再测试放映效果

方案3：检查Excel链接的自动更新设置 #

确保你的Excel链接在PPT里是自动更新状态：

• 右键点击链接的Excel对象 → 「链接」
• 在「更新」选项里选择「自动更新」
  另外，你设置的Excel自动保存频率（上线后10分钟），最好和Excel里SQL查询的刷新频率对齐，避免数据还没刷新就保存了，导致PPT拉到旧数据。

备选方案：用VBA优雅重启放映（比Windows宏靠谱） #

如果以上方法都不行，也不用折腾Windows宏，用PPT自己的VBA就能实现定时重启，体验更平滑：

' 先在模块顶部声明全局变量
Dim restartTimer As Double

Sub StartAutoRestartSlideShow()
    ' 启动幻灯片放映
    ActivePresentation.SlideShowSettings.Run
    ' 设置1小时后重启（时间格式是"小时:分钟:秒"）
    restartTimer = Now + TimeValue("01:00:00")
    Application.OnTime restartTimer, "RestartSlideShow"
End Sub

Sub RestartSlideShow()
    ' 停止当前放映
    If SlideShowWindows.Count > 0 Then
        SlideShowWindows(1).View.Exit
    End If
    ' 重新启动放映
    ActivePresentation.SlideShowSettings.Run
    ' 再次设置下一次重启
    restartTimer = Now + TimeValue("01:00:00")
    Application.OnTime restartTimer, "RestartSlideShow"
End Sub

用的时候，运行StartAutoRestartSlideShow代替手动启动放映，它会每小时自动重启一次，不会跳出PPT，比Windows宏友好得多。

内容的提问来源于stack exchange，提问作者Hsmith