VB + PowerPoint

[MediaVeroniK]

Tengo un problema con una aplicación Powerpoint y tal vez puedan ayudarme.
El caso es el siguiente:

Tengo que hacer una presentación en Powerpoint para una empresa.
Dicha presentación se compone de varios ppt's (unos 20), y todos tienen una botonera a través de la cual, puedo ir navegando por los diferentes ppt's.
El problema es que al decirle que del A, pase al B, el B se abre, pero el A se queda abierto por detrás. Y esto, cuando se han abierto las 20 presentaciones es un problema.
Lo que quiero es que al abrir una, se cierre la anterior.
Con Visual Basic, he conseguido más o menos el objetivo.
El código que he metido en la macro es el siguiente:

Sub pasarAaB()
Presentations.Open FileName:="B.pps", ReadOnly:=msoFalse
Application.Presentations("A.pps").Close
End Sub

De esta forma, desde A.pps, le ordeno que abra B.pps y a la vez A.pps se cierre.
Pero aquí me surge otro problema.
Que al ejecutar directamente A.pps no me funciona la macro. ( Sí que me funciona si ejecuto directamente A.ppt )
Pero si A.pps lo abro desde Powerpoint y le doy a previsualizar, entonces sí que funciona.
Así que lo que necesito es poder ejecutar esa orden desde los pps.
Bueno, o si hay otra solución perfecto.

Espero que haya entendido mi problema.
Muchas gracias por la atención prestada.
Un saludo