I am getting the error code "Method of 'Open' of object 'Presentations' Failed on the last line of code before the End Sub:
Private Sub MonthlyToplinePPT()
' Opens Presentation.pptx
Dim PPT As PowerPoint.Application
Set PPT = New PowerPoint.Application
PPT.Visible = True...