Sub ExportPPTToImages()
'|||Name:导出PPT为图片|Description:将PPT所有幻灯片导出为图片格式，支持PNG/JPG/BMP，包含错误处理|Vision:1.0.1|||
On Error GoTo ErrorHandler
Dim pptApp As Object
Dim pptPresentation As Object
Dim slide As Object
Dim exportPath As String
Dim fileFormat As PpSaveAsFileType
登录后可以发表评论
立即登录
暂无评论，来发表第一个评论吧！