PPT教程
PPT模板 设计素材 PPT背景图 PPT教程 专题 word模板 excel模板 PPT标签
个人规划 自我介绍 工作总结 求职竞聘 入职培训 述职报告
搜索
开通VIP
首页 PPT教程  PPT常见问题
全部 PPT资讯 PPT背景图 PPT技巧 PPT常见问题 图片素材 办公教程 PPT设计 视频教程

怎样将PPT文件转换为Word文档?

2018-03-05 22:14 责任编辑：砕月

Word 转换为PPT，也许你很容易做到，但是反之把PPT转换为Word你知道吗?我之前一直用一个很笨的方法，就是把里面的文字一段一段粘出来。文字少了还好说，要是文字多了，那个工作量就可想而知了......PowerPoint 2003 中的转换大家可能最为常用的是下面这种方法：(在Microsoft Office PowerPoint 2003版)1、首先打开需要转换成中文Word文件的中文Po

Word 转换为PPT，也许你很容易做到，但是反之把PPT转换为Word你知道吗?我之前一直用一个很笨的方法，就是把里面的文字一段一段粘出来。文字少了还好说，要是文字多了，那个工作量就可想而知了......

PowerPoint 2003 中的转换

大家可能最为常用的是下面这种方法：(在Microsoft Office PowerPoint 2003版)

1、首先打开需要转换成中文Word文件的中文PowerPoint文件，然后鼠标左键依次选择“文件→发送→Microsoft Word”命令项。

2.完成选择之后，系统首先会出现“撰写”对话框，此时应当在“在Microsoft Word使用的版式”栏中选择一种版面的配置，然后在“将幻灯片添加到Microsoft Word文档”栏中选择将中文PowerPoint的幻灯片转换到中文Word文件时的变化方式。

3.完成上述选择之后，接着使用鼠标左键单击“确定”按钮，即可启动中文Word，然后自动实现将中文PowerPoint文件转换到中文Word文件中，此时只需要在中文Word中稍微进行一些修改，即可完成转换工作。

但是经过我多次试用，其转换效果是相当的不令人满意。

PowerPoint 2007 中的转换

在Microsoft Office PowerPoint 2007版中，这个功能依然没有得到改善。只是在“发送”里面却找不到Microsoft Word命令项了。

微软Office 2007 的最大的失败就是对界面的改变，他几乎完全颠覆了我们使用多年的习惯，但是当你逐步了解了之后却又发现，根本没有实质性的改变，这也是为什么更多的网友不愿意接受Office 2007的理由之一。

Microsoft Word命令项的确被转移了地方，点击“发布”——点击“使用Microsoft Office Word创建讲义”菜单。

看到了什么?一个完全与PowerPoint 2003一样的对话框，甚至没有任何修饰，那么这个能实现PPT到Word 的转换吗?显然他与PowerPoint 2003 转换的效果是一样的，也以为着这一功能没有得到任何提升。同样是微软的办公平台，在互换上怎么就这么难?

一般细心的用户可能会在制作PPT的时候，首先使用Word创建文档，一式两份，这样以备不时之需，看来也是惧怕万一有人需要Word 文档，你再整理可能就会抓瞎。

说了这么多，究竟有没有什么方法能够完美将PPT转换为Word文档?我只能遗憾的告诉你，目前还真是没有什么完美解决方案。所谓的完美，当然是转换的文档你几乎不用修改就能使用。

虽然我说了上面的话，你也用不着马上离开，绝不意味着下面的方法对你没有任何作用!而这种方法恰恰是最简单的，也是最行之有效的方法，不信请继续往下看。

应用程序完美转换PPT 到Word 文档


说起来很简单，就是你把下面这段代码文字复制到Windows 文本中，将文件保存为 .vbs生成一个可执行程序。保存在任何一个地方，比如桌面。这段代码也是我在无意中发现的，但使用后感觉已经很好，并且简单。


'绑定到本地计算机

strComputer = "."

'如果发生错误，继续执行

on error resume next

Set objWMIService = GetObject("winmgmts:" _

& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

msgbox "此脚本可以批量将ppt文件中的文本转换为word文件。图片、表格等内容则自动跳过" & vbcrlf & "使用时请把所有要转换的ppt文件复制到目录c:\下。双击运行此文件即可。" & vbcrlf & "运行此脚本需要本机上安装了office"

'创建一个word对象

Set objWord = CreateObject("Word.Application")

'创建一个ppt对象

Set pptApp = CreateObject("PowerPoint.application")

'获得c:\目录下的文件集合

Set FileList = objWMIService.ExecQuery _

("ASSOCIATORS OF {Win32_Directory.Name='c:'} Where " _

& "ResultClass = CIM_DataFile")

For Each objFile In FileList

'如果文件的扩展名是ppt

If objFile.Extension = "ppt" Then

pptApp.visible = true

'打开这个ppt文件

Set pptSelection = pptApp.Presentations.Open("c:\" & objFile.FileName & "." & objFile.Extension)

'如果想让脚本处理得快些，把下面一行改为“objWord.Visible = false”,不推荐。

objWord.Visible = true

'新建一个word，以保存ppt中的文本

Set objDoc = objWord.Documents.Add()

Set objSelection = objWord.Selection

'从ppt的第一页开始循环。Slides.Count即幻灯片的数量

For i = 1 To pptSelection.Slides.Count

'从每一张ppt的第一个文本框开始循环，Shapes.Count，即每张幻灯片中文本框的数量

For j = 1 To pptSelection.Slides(i).Shapes.Count

'如果是每页的第一行，就按标题处理，变成黑体字

if i =1 then

objSelection.Font.Name = "黑体"

'把文本框中的文字添加到word中

objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text

objSelection.TypeParagraph()

objSelection.Font.Name = "宋体"

end if

objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text

'加一个回车

objSelection.TypeText vbcrlf

Next

next

'关闭这个ppt文件

pptSelection.close

'保存word文件。

objDoc.SaveAs("c:\" & objFile.FileName & ".doc")

'如果不需要关闭word，把下面这一行删掉  www.pptbz.com  ppt宝藏提供

objDoc.close

'如果不想弹出消息框，把下面这一行删掉

msgbox "转换后的word已保存在c:\" & objFile.FileName & ".doc"

else '没有ppt文件

'msgbox "错误：c:\下没有发现ppt文件！"

End If

Next

pptApp.quit

怎样使用程序将PPT转换为Word 文档?

将你需要转换的PPT文档放到C:\ 的根目录下，双击我们刚才生成的 .vbs 程序，弹出下面的对话框，点击“确定”。

之后稍等片刻(根据PPT 文档的大小可能等待的时间有所区别)。就会自动打开一个已经生成的Word 文档，怎么样，你看到了什么?转换完成，弹出下面的对话框，点击确定后收工。

这个程序无需安装，直接运行，文件也小。在转换前最好将之前打开的Word 和PowerPoint程序关闭。

由于本程序转换后的Word文档中文字顺序并未排版，因此尚需用户自行调整。但是这已经让我们事半功倍了。

热门标签更多

相关推荐

  • 销售促销活动方案ppt模板

    销售促销活动方案ppt模板

    今天为大家介绍一款销售促销活动方案ppt模板，有需要都可以来看看。更多下载请点击ppt家园。这是一款简洁清新的销售促销活动方案ppt模板，适用于营销类ppt模板制作。下载地址：销售促销活动方案ppt模板小编推荐：高大......

    2018-12-15

  • 营销大赛策划案ppt模板

    营销大赛策划案ppt模板

    今天为大家介绍一款营销大赛策划案ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款时尚清新的营销大赛策划案ppt模板，适用于商务类ppt模板的制作。下载地址：营销大赛策划案ppt模板小编推荐：中秋节晚......

    2018-09-23

  • ppt滴笔颜色怎么设置

    ppt滴笔颜色怎么设置

    ppt幻灯片放映的时候一般会用到画笔，默认颜色是红色，如何修改画笔默认颜色呢?我们来学习一下。打开ppt幻灯片，新建一个空白幻灯片。点击右下角的幻灯片按钮，然后右键-指针选项-笔。画一下看画笔默认颜色确实是红色......

    2017-07-14

  • 七一建党节党政工作汇报ppt模板

    七一建党节党政工作汇报ppt模板

    今天为大家介绍一款七一建党节党政工作汇报ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款隆重大气的建党节党政工作汇报ppt模板，适用于教育党政类ppt模板。下载地址：七一建党节党政工作汇报ppt模板......

    2019-06-20

  • 人物传记介绍ppt模板

    人物传记介绍ppt模板

    今天为大家介绍一款人物传记介绍ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款时尚大气的人物传记介绍ppt模板，适用于人物介绍类ppt模板制作。下载地址：人物传记介绍ppt模板小编推荐：人物传记阅读......

    2018-10-31

  • PPT如何快速抠图

    PPT如何快速抠图

    PPT如何快速抠图?我们在做ppt模板（www.pptjia.com）时，当插入图片中想要抠除一些多余的东西达到我们想要的某种效果，或更好的融入幻灯片背景中时，我们可以使用PPT的【删除背景】功能来进行抠图，怎么用PPT抠图呢?......

    2017-11-25

  • PPT幻灯片怎么打印讲义

    PPT幻灯片怎么打印讲义

    PPT幻灯片怎么打印讲义?采用ppt模板（www.pptjia.com）打印讲义的目的就是为了提供给观众留下空白行来记下备注，今天小编就把Powerpoint2010幻灯片打印讲义的方法介绍给大家。更多PPT教程尽在PPT家园，快来关注吧。（......

    2017-11-30

  • 服装品牌运营计划书ppt模板

    服装品牌运营计划书ppt模板

    今天为大家带来一款服装品牌运营计划书ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款简洁大气的服装品牌运营计划书ppt模板，适用于计划类ppt模板制作。下载地址：服装品牌运营计划书ppt模板小编推荐......

    2019-01-08

  • 开发工程师技术分享ppt模板

    开发工程师技术分享ppt模板

    今天为大家介绍一款开发工程师技术分享ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款清新大气的开发工程师技术分享ppt模板，适用于行业类ppt模板制作。下载地址：开发工程师技术分享ppt模板小编推荐......

    2019-08-08

  • 广告设计制作方案ppt模板

    广告设计制作方案ppt模板

    今天为大家介绍一款广告设计制作方案ppt模板，有需要的可以来看看。更多下载请点击ppt家园。这是一款清新大气的广告设计制作方案ppt模板，适用于各行业的ppt模板制作。下载地址：广告设计制作方案ppt模板小编推荐：制......

    2019-05-12

最新PPT模板更多

热门标签更多

建议不能为空
联系方式不能为空