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

Question

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

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 屏幕中，单击“工具”>“参考”，然后在“Microsoft Word xx.0 对象库”中找到列表。笔记; xx.0 将特定于您正在运行的 Word 版本。

希望这可以帮助您入门！