Ok, here's what you do:
- Right click on the image and select, 'Size & Position...'
- Select the 'Text Wrapping' tab
- Select 'Top & Bottom'
- Select the 'Position' tab
- Under the 'Horizontal' section, select 'Alignment' and then select 'Centered' relative to 'Column'
Unfortunately, doing this for multiple images is problematic. Format painter won't work. Also, simply using the Macro Recorder causes problems when trying to select the image.
So, creating a VBA macro and binding it to a key would seem to be the only way forward to make this super-efficient. Here are two helpful posts in this regard:
From the first of these references, I have tested the following VBA macro. Seems to work fine!
Dim myShape As Shape
If Selection.InlineShapes.Count > 0 Then
Set myShape = Selection.InlineShapes(1).ConvertToShape
ElseIf Selection.ShapeRange.Count > 0 Then
Set myShape = Selection.ShapeRange(1)
MsgBox "Please select a picture first."
.WrapFormat.Type = wdWrapTopBottom
.WrapFormat.DistanceTop = InchesToPoints(0.2)
.WrapFormat.DistanceBottom = InchesToPoints(0.2)
.RelativeHorizontalPosition = wdRelativeHorizontalPositionPage
.Left = wdShapeCenter