怎样将ppt一样的全部删掉

1.怎样把ppt中所有图片都删除了?

1.图片若不是在ppt幻灯片母版插入的，

2.只有在幻灯片母版里插入的，才能批量删除幻灯片里的同一张图片，以ppt2007为例，批量删除的方法如下：

打开ppt，点击“视图”下的“幻灯片母版”。

先选中幻灯片母版中的第一张母版缩略图，然后在版面里找到那张要删掉的图片，右击它，选择“剪切”，再点击“关闭母版视图”，这样每张幻灯片相同的图片都去掉了。

2.怎样把ppt中所有图片都删除了

新建一个宏（点工具-宏-宏，或直接按alt+F8），宏名字输入DeleteAllPictures（可以随便起），点创建按钮，复制如下代码：Sub DeleteAllPictures() Dim sldTemp As Slide Dim lngTemp As Long Dim lngCount As Long For Each sldTemp In ActivePresentation.Slides For lngCount = sldTemp.Shapes.Count To 1 Step -1 With sldTemp.Shapes(lngCount) If .Type = msoPicture Then .Delete End If End With Next NextEnd Sub运行之~~。

3.如何快速删除ppt的所有图片

用宏，下面是代码，可以将所有没有可编辑文字的元素都删去

Sub jj()

Set mydocument = ActivePresentation

For k = 1 To mydocument.Slides.Count '读入页数

i = 1

While i If mydocument.Slides(k).Shapes(i).TextFrame.HasText = msoFalse Then '判断是否和文字关联

mydocument.Slides(k).Shapes(i).Delete '删除

Else

i = i + 1

End If

Wend

Next k

End Sub