咔片PPT · AI自动生成演示文稿,模板丰富、排版精美 讯飞智文 · 一键生成PPT和Word,高效应对学习与办公

内容导航:


一、怎样将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 & "rootcimv2")
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格式


方法一、利用大纲视图。
打开PPT演示文稿,单击“大纲”,在左侧“幻灯片/大纲”任务窗格的“大纲”选项卡里单击一下鼠标,按“Ctrl+A”组合键全选内容,然后使用“Ctrl+C”组合键或右键单击在快捷菜单中选择“复制”命令,将内容粘贴到Word里。这种方法会把原来幻灯片中的行标、各种符号原封不动复制下来。

方法二、利用“发送”功能转换。
打开要转换的PPT幻灯片,单击“文件→发送→Microsoft Word”菜单命令。然后选择“只使用大纲”单选按钮,并单击“确定”按钮,等一会就发现整篇PPT文档在一个Word文档里被打开。在转换后会发现Word有很多空行。在Word里用替换功能全部删除空行可按“Ctrl+H”打开“替换”对话框,在“查找内容”里输入“^p^p”,在“替换为”里输入“^p”,多单击几次“全部替换”按钮即可。(“^”可在英文状态下用“Shift+6”键来输入)。
方法三、利用“另存为”直接转换。
打开需要转换的幻灯片,点击“文件”→“另存为”,然后在“保存类型”列表框里选择保存为“rtf”格式。现在用Word打开刚刚保存的rtf文件,使用这种方法需要对文档进行适当的编辑。


三、如何把ppt转换成word文档格式


1、启动PowerPoint,新建演示文稿,保存为目标文件名称“seo优化的流程”。
2、选择“普通”视图,单击“大纲”标签,将光标定位到第一张幻灯片处。
3、打开Word文档,全部选中,执行“复制”命令。切换到PowerPoint,执行“粘贴”命令,则将Word文档中的全部内容插入到了第一幻灯片中。
4、根据需要对文本格式进行设置,如字体、字号、字型、文字颜色和对齐方式等。
5、然后将光标切换到“大纲”标签,定位到需要划分为下一张幻灯片处,直接按回车键

补充:有时候word文档中的图片通过第一次复制不能直接粘贴到ppt中,这时候需要重新复制一次图片。
直接粘贴到ppt中。可以根据页面大小,选中直接图片显示调整大小。
以上步骤,ppt即可完成。最后一步,可以将生成的ppt进一步美化。通过“格式”>“幻灯片设计” 为该幻灯片添加相应的模板。
添加模板后的幻灯片,到此步已基本完成。其他细节可根据需要重新设计。