在日常办公中，很多人都会遇到这样的情况：

• PPT 内容需要转换成 Word 方便打印、发送或归档

• 直接复制粘贴到 Word 后容易出现排版错乱

• 字体、动画、布局在不同电脑上显示效果不一致

• PPT 文件数量很多，一个个截图插入效率极低

尤其是在课件整理、项目汇报、资料归档等场景下，经常需要将 PPT 转换成 Word，同时尽可能保持原来的显示效果。

现在，只需一套 VBA 工具，就能轻松实现 多个 PPT 批量转换为 Word 图片版，自动按页生成图片插入 Word，最大程度保留原有排版效果。

功能说明

✔ 批量处理整个文件夹内的 PPT 文件

一次选择文件夹，自动处理其中所有 PPT，无需逐个打开。

✔ 自动生成对应 Word 文件

每个 PPT 会自动生成对应的 Word 文档。

✔ 默认采用图片方式转换

将每页 PPT 转换成图片后插入 Word，避免：

• 字体变化

• 排版错乱

• 兼容性问题

最大程度还原原始效果。

✔ 自动处理重名文件

转换后的 Word 默认使用原文件名。

若存在重名文件，则自动生成：

原文件名_1

原文件名_2

原文件名_3

……

直到文件名不重复。

✔ 自动调整为横版页面

Word 页面默认改为横向布局，并自动适应 PPT 页面比例。

✔ 图片自动铺满页面

每页 PPT 内容会自动铺满 Word 页面，方便查看、打印和导出 PDF。、

使用步骤（仅需四步）

1️⃣ 查看下图操作流程，如需视频讲解可查看各大平台账号：技已成舟

2️⃣ 打开任意一个 Word，按 Alt + F11 打开 VBA 编辑器

3️⃣ 点击菜单栏：插入 → 模块

4️⃣ 粘贴代码后按 F5 运行宏

接着按提示完成：

• 选择需要转换的 PPT 所在文件夹

程序将自动将ppt转化为word

具体代码公众号回复：PPT转Word图片版  获取

具体代码公众号回复：PPT转Word图片版  获取