Compress PDFs using VBA

Question

I am looking to compress the PDF files using VBA. Is there any way I can do this?

P.S. I have Adobe Acrobat Pro Installed.

Thanks!