Reviewing this question Save InlineShape picture to file in Word VBA, the accepted answer works fine for our case but the saved png doesn't have the size used in the document and simply has the full original size.
As in the original question, the alternative that uses ADODB generates some artifacts in the file (white spaces) that I couldn't fix in code (don't know what causes them).
The HTML or the zip ways don't work for me because I have to keep track of each picture's name and location in the document (not that is important for this question but is a constrain of the process, I save those names in a CSV that also relates to the table in which appears the picture).
The way I used to do it was to copy the inlineshape range as a picture and save the clipboard content to a file with a powershell command run from within the vba code, but the antivirus where flagging the code and didn't let it to go through (I can't touch the antivirus, as is a macro for the client to execute)
I have searched but can't find a way to save in a folder the picture (inline shapes) with the size used in the document.
The saved picture could be in png, jpg or bmp.
Edit: I believe that the trick is in how the range is created from the Inline Shape's Range
Dim r As Range
Set r = shp.Range.Duplicate
r.Start = r.Start - 1
r.End = r.End + 1
I don't know if it is possible that when the creation of the duplicated range it could respect the configuration of the original object