Cambiar el tamaño a muchas imágenes dentro de un documento World...

Esta macro cambia el ancho de todas las imágenes al valor especificado (2 cm en este caso):

Sub Redimensionar()
' Cambia el ancho de todas las imágenes del documento
' al siguiente valor en cm (la altura se determina sola):
Ancho = 2
Ancho = CentimetersToPoints(Ancho)
For Each Flotante In ActiveDocument.Shapes
    Flotante.Height = Ancho * Flotante.Height / Flotante.Width
    Flotante.Width = Ancho
Next
For Each EnLinea In ActiveDocument.InlineShapes
    EnLinea.Height = Ancho * EnLinea.Height / EnLinea.Width
    EnLinea.Width = Ancho
Next
End Sub

Por ejemplo, partiendo de este documento, donde las dos imágenes de la izquierda están en línea y las dos de la derecha son flotantes):

Luego de ejecutar la macro, todas quedan de 2 cm de ancho y mantienen las proporciones. Este es el resultado:

La macro funciona con imágenes dentro de tablas, y también si las tablas están flotantes.

Acá encontrarás instrucciones para crear/pegar la macro de arriba. Una vez que la tengas funcionando, simplemente le asignas una secuencia de teclas o un botón y listo. No olvides cambiar el "2" del ejemplo al valor deseado (5.57). Si quieres la posibilidad de especificar ambos valores, dímelo, pero me pareció más lógico mantener las proporciones del original (aunque supongo que da lo mismo).

Cualquier problema, me posteas acá.

Los videotutoriales que encontré enseñan a grabar macros y asignarles un botón. En éste

En cuanto a tu pedido, prueba primero lo que te he dado, pues la macro mantiene las proporciones de la imagen original (te da la altura correcta para el ancho que especificas). Si lo que quieres es poder estirar la imagen arbitrariamente, luego la cambiamos, pero eso la deformaría.