从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也可以使用。