Using vba OnDesignfileClosed to set all compress options on and then run compress

Hi All,

Firstly, I am a VBA (very) newbie. I would like,  every time a design file is closed, to set all compress options "on" (ticked) and then run "Compress". The files that I need this to happen on lives in Projectwise and needs to be done without any user input.

Any help would be greatly appreciated.