密码保护:2014.04.15.Technical.department.dinner.in.the.evening
Word 使用宏非嵌入图片批量转嵌入图片
Office 2013 为例:
视图 – 宏 – 查看宏 – 创建
在代码框里填写下列代码,然后保存运行。
Sub 非嵌入转嵌入()
Dim oShape As Shape
For Each oShape In ActiveDocument.Shapes
oShape.ConvertToInlineShape
Next
End Sub