起因 我有些ppt需要转换成word文稿，但是一个一个复制太麻烦了。 有一种普遍的方法是打印大纲，但是我这ppt里面他没有大纲啊（（（ 然后就有一种通过脚本的方式来提取文字 记得要引用`Microsoft Word`，很重要！ 代码 Sub Main() On Error Resume

用于记录添加的短链接 https://qwind.fun