how to keep a presentation allways on the foreground

[kuyperlu]

Is it possible to force a ppt presentation to be allways on top (foreground)?
I use System Scheduler to open and close every few minutes an excel file to refresh data in the presentation. In the excel file runs a macro with application.windowsstate=xlminimized, but another open excelfile sometimes, but not allways, comes to the foreground.

[kuyperlu]

found a solution, so I close the thread:

Sub miniMalizerenExcelBook()
On Error Resume Next
With GetObject(, "Excel.Application")
.ActiveWindow.WindowState = 1 ' xlMinimized = 1
End With

End Sub