I looked at Ms's Powerpoint Object Model searching for any object which can handle an Event. All I could Find was UserForm Controls and PP application itself. Rather than trying to define a "WithEvents" App. I imagined this kludge. UserForms are a type of Class Module, one that can directly interact with the application.
Create a UserForm with one Command Button, The Code in the UserForm is only
Option Explicit
Private Sub CommandButton1_Click()
'Place the code you want to run after the timer function in here
End Sub
The TimerClass module code will look like this, based on your own Timer code
Option Explicit
Dim Trigger As Object
Dim mWaitTime As Long
Dim mRun As Boolean
Private Sub Class_Initialize()
Set Trigger = UserForm1
Load Trigger
End Sub
Public Property Let WaitTime(TimetoWait As Long)
mWaitTime = TimetoWait
End Property
Public Function StartTimer()
mRun = True
RunTimer
End Function
Private Sub RunTimer(()
Dim Starttime As Long
Starttime = Timer
While Timer < Start + mWaitTime
If Not mRun Then Exit Sub
Wend
Trigger.CommandButton1_Click 'May need to use Trigger.CommandButton1.Click
End Sub
Private Sub Class_Terminate()
Unload Trigger
End Sub
In your code
Dim ClassTimer2 As ClassTimer
Set ClassTimer2 = New ClassTimer
ActivePresentation.SlideShowWindow.View.Next 'this is my game screen
ClassTimer2.WaitTime = 59
ClassTimer2.Runtimer