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

• Excel 数据需要提交 Word 版存档或打印
• 一个个复制粘贴表格到 Word 非常耗时
• 一个 Excel 有多个工作表，整理起来特别麻烦
• 文件数量一多，手动转换效率极低

尤其是在报表汇总、资料归档、项目交付时，
经常需要将大量 Excel 转换成 Word 文档。

现在，只需 一套 VBA 工具，就可以实现：

批量将多个 Excel 自动转换为 Word 文件，并自动整理表格布局与分页。

功能说明

✔ 批量转换整个文件夹内的 Excel 文件
选择文件夹后，自动处理其中所有 Excel 文件。

✔ 自动处理重名文件
转换后默认使用原文件名命名。

若存在同名文件，则自动命名为：

原文件名_1
原文件名_2
原文件名_3
……

直到文件名不重复。

✔ 自动适应 Word 页面宽度
转换后的表格会自动调整宽度，适应 Word 页面大小。

✔ 支持多个工作表同时转换
如果单个 Excel 中包含多个工作表：

• 所有工作表都会转换
• 输出到同一个 Word 文件中

无需手动拆分整理。

✔ 每个工作表单独分页
转换后：

• 每个工作表独占一页
• 自动显示对应表名

方便阅读与打印。

✔ 保留原有字体和样式
转换过程中：

• 字体保持原样
• 字号保持原样
• 单元格样式保持原样

尽可能还原 Excel 原始效果。

✔ 自动添加全边框
生成的 Word 表格默认采用全边框样式，方便查看与打印。

使用步骤（仅需四步）

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

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

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

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

接着按提示完成：

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

程序将自动将excel转化为word文件

具体代码公众号回复：Excel转Word  获取