Refresh links in PowerPoint show

I am using Office 2019, and have my power point file and the excel file in the same folder on C: drive.
The slide show runs in a loop and I would like to get it to auto refresh with every loop. It worked last year, I cannot seem to get to work this year.

Code:

---

Sub Auto_ShowBegin()
ActivePresentation.UpdateLinks
End Sub

Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
' AUTO UPDATE OF OLE LINKS MACRO
If SSW.View.CurrentShowPosition = 2 Then
        ActivePresentation.UpdateLinks
    End If
End Sub

---

Mike P
Wisconsin, USA

OnSlideShowPageChange dates back to 1997 and can be unreliable. Auto_ShowBegin will not work at all.

It will help if you put a command button (or any ActivX item) of slide 1 and set it to not visible in the selection pane. No need to add any code.

Thanks for your answer. I try it soon, I have to mow lawns tomorrow.

Mike P

I have to put this issue on hold for a couple of weeks.
John when you indicated 1997, that gave me an idea. Take our 3 XP laptop out of storage running office 2007. Get the Powerpoint to refresh the links to the single excel file. That all works and that is what I will use this Sunday at our club, for our event.

Thanks,

Mike P
Wisconsin, USA