怎样快速把ppt 转换doc（太酷了1分钟把PPT秒变Word）

相信大家平时在工作的时候，是否会遇到这样的问题：

相信这个问题很多需要做PPT报告的职场人都会遇到，还有学生党要提取老师的PPT课件也是很头疼的问题！不要担心！今天小编就来教大家怎么来轻松提取PPT内容，你的PPT秒变成Word出来！内容很干货，建议收藏嘻嘻！

首先给各位看一下我们需要提取的PPT课件内容，整整有100多页~

需要注意的是，我们下面提取的PPT内容范围，主要是通过文本框形式来加入的内容哦！其他形式的文本内容（例如图片）是没有办法提取的哦！

好啦~接下来我们来看看怎么来转换吧！

第一步：

首先打开你的PPT，然后按下【Alt F11】键进入VBA页面，点击【插入】-【模块】。

第二步：

再点击【工具】里面，选择【引用】的选项。

第三步：

这时候会出现一个引用的可使用选项，我们在下拉框中找到【Microsoft Word 15.0 ObjectLibrary】然后进行勾选，完成后点击【确定】。

第四步：

回到代码框，然后复制下面的代码（直接复制即可），然后按下【F5】键，执行以下的代码。

【代码】———

Sub Main()

On Error Resume Next

Dim temp As New Word.Document, tmpShape As Shape, tmpSlide As Slide

For Each tmpSlide In ActivePresentation.Slides

For Each tmpShape In tmpSlide.Shapes

temp.Range().Text = temp.Range() tmpShape.TextFrame.TextRange.Text

Next tmpShape

Next tmpSlide

temp.Application.Visible = True

End Sub

第五步：

然后稍等一会，后台会自动进行转换，稍等片刻后就会自动生成一个带有PPT文本内容的Word文案，妥妥的全部都包含在里面了哈！

你可以直接进行保存、编辑、或者修改，别提有多方便啦！

好啦~以上就是关于怎么批量提取PPT内容的方法技巧了，希望对你有所帮助，有了这个方法，老板给你再多的PPT文档，你都可以轻松提取里面的文字到Word文档里啦~感兴趣的朋友可以收藏起来哦！以免不时之需！

欢迎继续关注！更多有趣好玩的PPT技巧分享给大家！