ppt怎么全选将所有内容删除

1.PPT课件手动画的东西怎么一次性全删了,每个课件都有100多页,逐

如果你以后经常会用笔来勾画，我建议你把你的课件PPT都做成图片的形式，然后贴在PPT里，直接锁定背景，下次你删课件画笔的时候，直接Ctrl+A即可把之前的全部删除掉。

或者你下次用课件之前，copy一个就是，这样不就每次都有新的用了。

如果你的课件也是控件形式，请参考我的附图，开始-选择-选择窗体，然后会把你这个PPT上所有的控件给删掉。。。你在里面把你不要的窗体选中。然后一次性Delete，好像比你拿鼠标一个个点，还容易误删课件内容，好那么一点点吧。

请参考！

2.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