Visual Basic - Macro powerpoint error al cerrar presentacion

Hola!

estoy haciendo una macro en powerpoint que a partir de unos datos y de una plantilla powerpoint genera una presentación, el problema es que al final del programa cierro el powerpoint plantilla así:

If Not pptPresentacion Is Nothing Then
pptPresentacion.Close
Set pptPresentacion = Nothing
End If

y se ejecuta una vez, pero al intentar ejecutarla una segunda vez, el powerpoint se queda colgado y tengo que reiniciarlo. He probado a quitar directamente esas líneas y así funciona, pero se queda abierto el powerpoint plantilla ¿qué puedo hacer para que se cierre sin dejar colgado al powerpoint?

Muchas gracias

Para cerrar el powerpoint o otras aplicaciones de Microsft Office

Application.Quit

Pero yo no quiero cerrar el programa powerpoint , sólo quiero cerrar el archivo powerpoint de la plantilla, pero que se mantenga abierto el que contiene la macro