ConvertToInlineShape 方法

将文档绘图层的指定图形转换为文字层的嵌入式图形。只能转换代表图片、OLE 对象或 ActiveX 控件的图形。此方法返回一个表示图片或 OLE 对象的 InlineShape 对象。

expression   必需。该表达式返回一个 Shape 或 ShapeRange 对象。

说明

支持附加文字的图形不能转换为嵌入式图形。对这样的图形请使用 ConvertToFrame 方法。

如果对包含多个图形的 ShapeRange 对象使用此方法，将导致出错。

示例

本示例将 MyDoc.doc 中的每张图片转换为嵌入式图形。

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