有这么一个Word文档

里面插入了9张图片

其中第1页有4张嵌入型图片

所谓嵌入型，就是把图片当字符处理的

第2页有5张非嵌入型图片

包括四周型、紧密型、穿越型、上下型、文字上方、文字下方

这几种类型都是属于图片类型

1、用查找替换批量删除嵌入型图片

ctrl+h

查找内容里输入 ^g

点击全部替换

就把第1页word里的4张图片删除了

2、另外5张非嵌入型图片

开发工具，VB或者alt+f11

然后插入，模块

双击模块1

把代码粘贴过来

Sub PicDel()

Dim doc As Document, i&, n&, S As Shape

Set doc = ActiveDocument

If doc.Shapes.Count = 0 Then Exit Sub

n = doc.Shapes.Count

For i = n To 1 Step -1

Set S = doc.Shapes(i)

If S.Type = 13 Then S.Delete

Next

End Sub

关闭VBA窗口

ALT+F8

运行

就全部删除干净了