com_error:(-21473525567,‘发生意外‘。

用python win32com.client，论坛中找到的代码合并ppt文件时报错：

com_error: (-2147352567, ‘发生意外。’, (0, None, None, None, 0, -2147024894), None)

发现可能是由于pptm带宏文件在打开时会弹窗“宏不可用”，由于弹窗没有自动关闭导致发生意外。
修改代码如下：
‘’’ exit_ppt = Application.Presentations.Open(name)
page_num = exit_ppt.Slides.Count##
exit_ppt.Close()’’’

Application = win32com.client.Dispatch(“PowerPoint.Application”)

Application.Visible = True

new_ppt = Application.Presentations.Add()

for root,dirs,files in os.walk(’./’):
for name in files:
f=os.path.join(root,name)
print(f)
if f[-5:]==’.pptm’:
page_num=19 # 找最大的那个ppt看有多少页，手动改 ,但是很奇怪最大好像只能到19，改个20或以上它就不复制直接结束了

while page_num > 0:
try:
num = new_ppt.Slides.InsertFromFile(name,new_ppt.Slides.Count,1,page_num)
break
except:
page_num -= 1
new_ppt.Save()
Application.Quit()