通过具有动态幻灯片持续时间的脚本将powerpoint导出到mp4

import os
import win32com.client as win32

def export_ppt_to_mp4(ppt_path, mp4_path, durations):
    # 打开PowerPoint文件
    powerpoint = win32.gencache.EnsureDispatch('PowerPoint.Application')
    presentation = powerpoint.Presentations.Open(ppt_path)
    
    # 设置每张幻灯片的持续时间
    for i, slide in enumerate(presentation.Slides):
        slide.Duration = durations[i]
    
    # 导出为MP4
    presentation.ExportAsFixedFormat(0, mp4_path)
    
    # 关闭PowerPoint
    presentation.Close()
    powerpoint.Quit()

# 示例用法
ppt_path = 'example.pptx'
mp4_path = 'example.mp4'
durations = [3, 5, 4, 6]  # 每张幻灯片的持续时间（秒）

export_ppt_to_mp4(ppt_path, mp4_path, durations)