Shape.ConvertToInlineShape (Word)

Converte a forma especificada na camada de desenho de um documento em uma forma embutida na camada de texto. É possível converter somente formas que representam imagens, objetos OLE ou controles ActiveX. Esse método retorna um objeto InlineShape que representa a imagem ou o objeto OLE.

Formas que dão suporte ao texto anexado não podem ser convertidas em formas embutidas. Para essas formas, use o método ConvertToFrame. Se você usar esse método em um objeto ShapeRange que contenha mais de uma forma, ocorrerá um erro.

For Each s In Documents("MyDoc.doc").Shapes 
 If s.Type = msoPicture Then 
 s.ConvertToInlineShape 
 End If 
Next s