从PowerPoint2010开始,就已经支持PPT导出为视频的功能了,不过到目前为止,也只是提供了导出为最高1080P的视频,以及720P和480P的选项,如果你想获得更高清的分辨率或者是任意大小的分辨率,可以试试下面这个方法。

打开要转换为视频的PPT,快捷键Alt+F11打开宏窗口,选择插入-模块(M),将下面一段代码输入到窗口中。
Sub MkVideo()
If ActivePresentation.CreateVideoStatus <> ppMediaTaskStatusInProgress Then
ActivePresentation.CreateVideo FileName:=Environ("USERPROFILE") & "Desktop est.wmv", _
UseTimingsAndNarrations:=True, _
VertResolution:=1080, _
FramesPerSecond:=25, _
Quality:=100
Else: MsgBox "There is another conversion to video in progress"
End If
End Sub
选择运行宏,等待一段时间后,视频保存在桌面:test.wmv
代码中:
VertResolution:=1080(1080为视频的高度,可自由调整)
FramesPerSecond:=25(25为帧数/秒,数字越高视频越流畅,也更大)
test.wmv(test为视频名称,可以修改)
使用上述代码,可导出任意分辨率视频,包括PowerPoint2007也可以使用。