I tried your script and either I'm not doing it right or something else.

I saved the ppt to a pptm format and then opened it and went to macros and created and pasted in your script.. I then hit run, but nothing seems to happen.... what am I missing... thanks