VBA埋め込みビデオをPowerpointプレゼンテーションから書き出す

Question

プレゼンテーション全体をHTMLに変換し、埋め込まれたコンテンツなどをすべて抽出しています。テキスト、オーディオ、ナレーションなどはすべて正常に機能していますが、ビデオコンテンツを書き出す方法を見つけるのは困難です。

プレゼンテーション内のすべてのスライドをループし、次にスライド上のすべてのシェイプをタイプmsoMediaのシェイプを探します。見つけたらMediaTypeです。それがppMediaTypeMovieの場合は、Shape.LinkFormat.SourceFullNameを使用して外部リンクされたビデオファイルのソースファイルを見つけることができますが、埋め込まれたコンテンツにアクセスする方法がわかりません。

MediaTypeの形がppMediaTypeSoundの場合は、Shape.SoundFormat.Exportを使用して音声を書き出すことができます。誰もVIDEOシェイプと同等のことを知っていますか？ （Shape.VideoFormatはありません）私は無駄にすることができるすべての可能なデータメンバーを見ながら何日も過ごしました。

Answer 1

Microsoftがとにかく一時フォルダにメディアファイルの内容を抽出し、埋め込まれた動画はまだ抽出されたビデオにLinkFormat.SourceFullName提供表示されます：

?oshape.LinkFormat.SourceFullName

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

すべてのことを私はffmpegを介してこのファイルを起動する必要があり、私は望む形式で、私のビデオを持っている！

ありがとうございました:)

Answer 2

注：最近のPPTバージョンでも、埋め込みサウンドで.Exportメソッドが機能しないことがあります。

アレックスの提案は私が最初に検討するものです。それ以外の場合は、PPTX/PPSX /などを解凍して、メディアフォルダ内のビデオを見つけることができます。または、XMLプレゼンテーションとして保存することもできます。あなたはそれからビデオを解析することができるかもしれません。