如何将EXCEL中的内容填入word中

aloon505

如题，excel表中A列为word文件名，如何用VBA将excel对应信息填入对应的word中。谢谢。

z_colin

百度 邮件合并

aloon505

z_colin 发表于 2019-12-17 09:02
百度 邮件合并

我只是想知道用VBA怎么实现。实际的表格更复杂，先学会简单的，难的再慢慢琢磨。

蓝桥玄霜

写入的代码：

约定的童话

蓝桥玄霜 发表于 2019-12-17 11:41
写入的代码：

太帅了，学习了！

aloon505

蓝桥玄霜 发表于 2019-12-17 11:41
写入的代码：

.Range.Cells(4).Range.Text = arr(i, 2)
.Range.Cells(5).Range.Text = arr(i, 3)
.Range.Cells(6).Range.Text = arr(i, 4)
谢谢老师，试了很多，改成这样才运行成功。不知道为什么，我的OFFICE 版本2010。

蓝桥玄霜

aloon505 发表于 2019-12-17 17:57
.Range.Cells(4).Range.Text = arr(i, 2)
.Range.Cells(5).Range.Text = arr(i, 3)
.Range.Cells(6).Ra ...

是有两种写法。不知道各个版本会有所不同。

duoduolianxi

《Excel VBA经典代码应用大全》示例文件_ExcelHome第19章有示例