How to reduce the resolution of images in Word documents - using a VBA macro?

Question

Macros

Actually, I found only macros for resizing images, but did not understand how to remake it to change the resolution of images.
There is a function in Word to compress pictures (the format is to compress pictures) You need a macro to compress pictures for the Internet and the screen (96 p / d)
Maybe someone has a batch solution that will be generally cool. Thank you all in advance.