导读:PPT是一种非常常见的演示工具,在我们的各种会议和报告中经常用到,而如何导出其中的图片成为一个非常值得考虑的问题。本文将会详细讲解PPT图片的导出方法,让您可以轻松地将PPT中的图片导出并应用于其它文档中。
1. 从PPT中导出单张图片
1.1 通过鼠标右键菜单导出
鼠标右键点击您所需要的图片,然后选择“另存为图片”,系统将会提示您选择保存的位置和名称,然后点击“保存”即可将该图片保存到您选择的位置。
值得注意的是, 通过这种方式导出的图片的格式只有 JPEG 和 PNG。
1.2 通过快捷键导出
选中您所需要的图片,然后同时按下 Ctrl + Shift + S 键,系统将会提示您选择保存的位置和名称,然后点击“保存”即可将该图片保存到您选择的位置。
与右键菜单导出相比,通过快捷键导出图片的格式不仅有 JPEG 和 PNG,还包括 BMP, GIF, TIFF 和 WMF。
2. 从PPT中导出多张图片
2.1 通过“另存为”导出
打开您的PPT文件,然后在“文件”菜单中选择“另存为”,在“文件类型”选项中选择“图片”,然后点击“保存”即可将PPT的每一页都导出成为单独的图片文件。
这种方式的缺点是您需要手动地将每一张图片文件命名。而且,此方法只能将 PPT 保存为以下格式中的一个:JPG,PNG, GIF, BMP 或 TIFF。
2.2 通过VBA宏导出
VBA是 Visual Basic for Applications 的缩写,是一种用于自动化任务的编程语言。以下是使用 VBA 导出所有 PPT 页面到指定文件夹的代码。
Sub ExportPPTSlides()
Dim path As String, baseName As String
Dim slide As slide, tempSlide As slide
Dim slidesCount As Long
Dim saveFormat As Long
' Default save format is .jpg
saveFormat = PpShapeFormat.ppShapeFormatJPG
path = "C:\Users\teatime\Desktop\Test\" ' Specify the folder to save
baseName = "Slide" ' Name prefix of each file
slidesCount = ActivePresentation.Slides.Count
For i = 1 To slidesCount
Set slide = ActivePresentation.Slides(i)
Set tempSlide = ActivePresentation.Slides.AddSlide(i, ActivePresentation.SlideMaster.CustomLayouts(1))
slide.Copy
tempSlide.Shapes.Paste
' Export the picture file
tempSlide.Export path & baseName & "-" & i & ".jpg", "JPG", 500, 400, saveFormat
tempSlide.Delete
Next
End Sub
您可以使用此代码来自动导出 PPT 中的每一页,这种方式不仅能够将 PPT 文件导出为 JPG,还可以将该 PPT 文件保存为 PNG 和 BMP。
总结
通过本文的介绍,我们可以发现,针对不同的需求和场景,我们可以选择不同的方式去导出 PPT 中的图片。不过无论哪种方式,我们都可以轻松地将 PPT 中的图片导出并应用到其它文档中,提高我们的效率和工作质量。