Compress Images in Office with VBA

Question

I'm looking for a way to programmatically emulate PowerPoint and Word's behavior of compressing pictures to 150 or 96 dpi (ppi) (and removing crops, if there). I need to make a whole ton of presentations and documents smaller for distribution and can't open them up one by one to change DPI by hand for all of them. Is there any way to do this with VBA?

Answer 1

Not a lot of simple ways to do this, but these techniques can be used: http://www.keyongtech.com/1489323-compressing-inlineshapes-in-code