如何把PPT转换成Word文档？

powerpoint 2003

1
运行powerpoint 2003软件，单击菜单栏的“文件”按钮，打开的快捷菜单指向“发送”，在下一级菜单中单击“Microsoft Office Word”命令

2
弹出“发送到 Microsoft Office Word”对话框，选择您喜欢的版式界面，然后在“将幻灯片添加到 Microsoft Office Word 文档”中一栏选择“粘贴”或“粘贴链接”方式

end
powerpoint 2010

1
运行powerpoint 2010软件，单击左上角的“文件”按钮，出来的界面单击左侧的“保存并发送”选项

2
在文件类型栏下单击“创建讲义”，然后在右侧界面中单击“创建讲义”按钮

3
弹出跟powerpoint 2003一样的界面，设置完成后单击“确定”按钮即可

end
使用脚本文件把PPT转换为Word 文档

在桌面上新建一个文本文档，将下面的代码复制进去

'绑定到本地计算机
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，把下面这一行删掉
objdoc.close
'如果不想弹出消息框，把下面这一行删掉
msgbox "转换后的Word已保存在c:\" & objfile.filename & ".doc"
else '没有PPT文件
'msgbox "错误：c:\下没有发现PPT文件！"
end if
next
PPTapp.qUIt

在菜单栏点击“文件”——“另存为”命令

指定好要保存文件的位置，在文件名框中输入任意名称+vbs扩展名，然后单击“保存”按钮

此时会在桌面上生成vbs脚本文件，将要转换的PPT演示文稿放到c盘根目录，并执行vbs脚本文件

弹出以下提示对话框，直接单击“确定”按钮即可

最后自动打开转换好的Word 文档并弹出以下提示对话框，单击“确定”按钮

PPT转换成Word文档格式用下面的方法就能轻松完成：
1.首先打开PDF格式转换工具，选择转换格式；

2.设置一下文件的保存路径，并将要转换的文件添加进来；

3.最后单击开始转换就行了。

方法来自：http://jingyan.bAIdu.com/article/ed2a5d1f6f4fa309f6be17ba.html