A. 如何将PPt转化为word
解决办法一,来有一款小软自件叫ppt2word可以将ppt里面的文字提取出来转化成word
速度很快 但不能提取图片 很好用 。
解决办法二,文件,另存为,大纲/rtf文件,然后就可以看到一个用word打开的大纲文档文件了,是只有大纲的。
解决办法三,有个软件好象叫 CZ-Ppt2Txt For MS PowerPoint,可以转化的,我没用过,不过听说挺好用的。可以网络一下,下个这个小软件。
解决办法四,和方法二类似,就是“打开需要转换的演示文稿,执行“文件发送Microsoft Office Word”命令,打开“发送到Microsoft Office Word”对话框,选中其中的“只使用大纲”选项,按下“确定”按钮,系统自动启动Word,并将演示文稿中的字符转换到Word文档中,编辑保存即可。
注意:要转换的演示文稿必须是用PowerPoint内置的“幻灯片版式”制作的幻灯片。如果是通过插入文本框等方法输入的字符,是不能实现转换的。
”。所以第四个方法并不怎么实用的样子。。^_^。。
祝愿楼主可以早点解决问题啊。。^_^。。
B. 如何把ppt文件转换成word文档
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,把下面这一行删掉
objDoc.close
'如果不想弹出消息框,把下面这一行删掉
msgbox
"转换后的word已保存在c:\"
&
objFile.FileName
&
".doc"
else
'没有ppt文件
'msgbox
"错误:c:\下没有发现ppt文件!"
End
If
Next
pptApp.quit
将你需要转换的PPT文档放到C:\
的根目录下,双击我们刚才生成的
.vbs
程序,弹出下面的对话框,点击“确定”。
之后稍等片刻(根据PPT
文档的大小可能等待的时间有所区别)。就会自动打开一个已经生成的Word
文档,怎么样,你看到了什么?转换完成,弹出下面的对话框,点击确定后收工。
这个程序无需安装,直接运行,文件也小。在转换前最好将之前打开的Word
和PowerPoint程序关闭。
由于本程序转换后的Word文档中文字顺序并未排版,因此尚需用户自行调整。但是这已经让我们事半功倍了。