Options.PictureWrapType (Word)
Define ou retorna um WdWrapTypeMerged que indica como o Microsoft Word quebra o texto em torno das imagens. Leitura/gravação. Os valores de retorno possíveis são wdWrapMergeBehind - Atrás do texto, wdWrapMergeFront - Em frente ao texto, wdWrapMergeInline - Alinhado com o texto, wdWrapMergeSquare - Quadrdo, wdWrapMergeThrough - Através, wdWrapMergeTight - Justo, wdWrapMergeTopBottom - No início e no fim.
Esta é uma configuração padrão de opção e afeta todas as figuras inseridas, a menos que a quebra de texto seja definida somente para uma figura.
Sub PicWrap()
With Application.Options
If .PictureWrapType <> wdWrapMergeInline Then
.PictureWrapType = wdWrapMergeInline
End If
End With
End Sub