Abrir PowerPoint desde Excel - excel, vba, powerpoint

Estoy intentando abrir una presentación de PowerPoint desde un archivo de Excel usando una macro. Estoy usando el siguiente código:

Private Sub testButton_Click()
Dim objPPT                               As Object
Set objPPT = CreateObject("PowerPoint.application")
objPPT.Visible = True
objPPT.Activate
objPPT.Presentations.Open (CStr(ActiveWorkbook.Path) + "DailyHealthCheck9_24_15.ppt")
End Sub

pero estoy recibiendo el siguiente error de tiempo de ejecución:

PowerPoint se inicia pero no abrirá el archivo. He comprobado la ruta del archivo y es correcta.

¿Puede alguien explicar por qué ocurre esto?

Tal vez es algún tipo de protección en el archivo de PowerPoint.

Respuestas

Su ruta o nombre de archivo debe ser incorrecto. Es el archivo un ppt seguro. ¿No es un pptx?

Cambia la línea abierta a

objPPT.Presentations.Open ActiveWorkbook.Path & "DailyHealthCheck9_24_15.pptx"