Question

我有一个如下所示的Excel文件：

     A          B
1  Title_1  Description_1
2  Title_2  Description_2

是否可以将每个标题和描述输出到单个Word文件，其中A列为Word文件的文件名，B列为其内容？

例如，宏将创建一个新的Word文件，为其提供文件名＆＃39; Title_1＆＃39;并复制＆＃39; Description_1＆＃39;。然后再次创建一个新的Word文件，为其提供文件名＆＃39; Title_2＆＃39;并复制＆＃39; Description_2＆＃39;。并执行此操作，直到复制Excel文件中的所有数据。

感谢您的时间。：）

Answer 1

您要查看的内容称为“邮件合并”。使用搜索引擎并查找“mail merge excel word 2007”（或您正在使用的MS Office的任何年份）。您可以创建一个用于创建单词实例的excel宏，用excel电子表格中的任何内容填充单词doc，使用您想要的任何名称保存单词doc，导出为PDF等。

Answer 2

以下是一些启示你的提示：

VBE中的

转到工具引用并为Microsoft Office添加一个。

使用这两行代码创建一个对象：

Dim MyWord
Set MyWord = CreateObject("Word.Application")

现在你可以在MyWord的任何单词代码之前，例如在word中添加一个Document将是Documents.Add，这样远程从Excel中将是MyWord.Documents.Add

您需要在excel中遍历您的单元格。在循环的每次迭代中，填充两个变量，一个包含文件中所需的文本，另一个包含文件名。

然后只需使用MyWord输入变量的结果，然后使用其他变量的结果保存文件。

如果你遇到困难，请回复，但先试试吧。

Answer 3

这很容易在任何操作系统中使用，假设您使用的是Windows，您将使用批处理脚本（最简单）。

首先在数据功能区上使用save as / export保存为CSV。

其次，您需要一个批处理脚本来读取CSV并使用第一个值作为文件名，第二个值作为内容。如果您希望它是doc或docx而不是txt，只需在同一循环中重命名该文件，或在输出到文本时将其添加到文件名中。

这是一篇类似的文章，其中包含快速批处理脚本所需的所有资源。

read csv file through windows batch file and create txt file

从excel单元格到单个word文件的文本

3 个答案: