VBA 从 Powerpoint 演示文稿中导出嵌入的视频

Question

我正在尝试将整个演示文稿转换为 HTML，同时提取所有嵌入的内容等。我的文字、音频、旁白等都可以正常工作，但在找出如何导出视频内容时遇到了麻烦。

我循环浏览演示文稿中的所有幻灯片，然后是幻灯片上的所有形状，寻找msoMedia 类型的形状。如果我找到了，我会检查它是MediaType。如果是ppMediaTypeMovie，那么我可以使用Shape.LinkFormat.SourceFullName 找到外部链接视频文件的源文件，但我终生无法找到访问嵌入内容的方法。

如果我找到一个具有ppMediaTypeSound 的MediaType 的形状，那么我可以使用Shape.SoundFormat.Export 来导出音频。有人知道 VIDEO 形状的等价物吗？ （没有Shape.VideoFormat）我已经花了几天时间查看所有可能的数据成员，但无济于事。

Answer 1

微软似乎将媒体文件的内容提取到一个临时文件夹中，嵌入的视频仍然为提取的视频提供 LinkFormat.SourceFullName：

?oshape.LinkFormat.SourceFullName

C:\Users\Alex\AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.MSO\F26FF1D0.m4v

我需要做的就是通过 ffmpeg 触发这个文件，然后我就得到了我想要的格式的视频！

感谢您的帮助:)

Answer 2

注意：您可能会发现 .Export 方法在最近的 PPT 版本中也不适用于嵌入的声音。

Alex 的建议是我首先要研究的；否则您可以解压缩 PPTX/PPSX/etc 并在媒体文件夹中找到视频。或者您可以尝试另存为 XML 演示文稿；您也许可以从中解析出视频。