4

我正在使用从用户输入中收集的数据填写 Word 模板。特别是选择（可变）数量的文档，并且关于每个文档的信息填满表格的一行。

我已经为模板中的几个项目添加了书签，并成功地在我的宏的标题中填写了信息，但我不太确定该表。我为第一个单元格添加了书签，并尝试通过标签（使用 Chr(9)），还尝试传递一个数组。（在模板中，表格只有第一行。通常在最后一列之后按 Tab 键会创建一个额外的行。）

我可以用

   Word.Application.ActiveDocument.Tables(1).Cell(3, 1).Range.Text

但不能写入除第一个单元格之外的任何单元格，我在其中放置了书签。

谁能提供一个可能的解决方案来填充表格？

4

2 回答 2

8

要填充表格，请使用此代码

ActiveDocument.Tables(1).Cell(1, 1).Range.Text = "Blah Blah"

这将写入第一个表中的第一个单元格。使用循环填充其余单元格。

我还建议查看此链接。

主题：自动化数据插入和提取的词表

链接： http: //msdn.microsoft.com/en-us/library/aa537149%28v=office.11​​%29.aspx#Y1254

提取物：

摘要：了解如何在 Word 中自动创建和格式化表格。获取有关优化性能、用数据填充表、格式化表结构、链接表数据以及从表中提取数据的信息。（25 页）

于 2012-05-22T11:28:36.617 回答
0

实际上，我在使用 Access 自动填写 Word 表格模板时遇到了类似的问题。我发现如果我在运行 VBA 脚本之前在 Word 中打开了模板，那么 Word 文档中的表格信息就成功填写了。就逐行添加而言，我的代码看起来与您的相似。因为要传输到表单的字段数量是动态的，所以每个部分的书签似乎都不起作用。如果您有任何更新，我很高兴听到解决此问题的不同方法。

于 2016-08-12T15:50:03.647 回答