如何通过excel宏创建多个word文档（空白），具体名称？

Question

我在Excel工作表中有2列，一个有目录，另一个有需求名称。我想要的是宏应该为第二列的每个值创建Word文档，目录中需要AND的名称第一次提到的。 （如果目录不可用，它应自动创建目录）

Answer 1

我已经快速打开了这个，打开你的word文档，根据Range("A2")中的目录保存它，文件名为Range("B2")，然后关闭文件。

Sub Button1_Click()

Dim oWord As Word.Application
Set oWord = New Word.Application
oWord.Visible = True

oWord.Documents.Add Template:="Normal", NewTemplate:=False, DocumentType:=0
oWord.ActiveDocument.SaveAs2 Filename:=Range("A2") & Range("B2")
oWord.ActiveDocument.Close SaveChanges:=False

oWord.Quit
Set oWord = Nothing

End Sub

这应该为您提供了一个很好的基础，可以在A列中循环，保存文档，然后更正任何空目录（可以使用if语句完成）。

您必须确保已选中Microsoft Word参考 - 要执行此操作，请确保您已进入VBA屏幕，单击“工具”＆gt; “引用”然后在列表中找到“Microsoft Word xx.0 Object Library”。注意; xx.0将特定于您正在运行的Word版本。

希望这有助于您开始使用！