Vba Microsoft Word输入字段

我有一个word模板，在打开新文档时提示用户输入一些文本。我正在使用填充字段来完成这项工作，效果很好。 我的问题是：如何引用“填写”字段以将用户文本指定给文档的标题

我正在使用此代码，但它不起作用：

With Dialogs(wdDialogFileSummaryInfo)
    .Title = Fillin
    .Execute
End With

这里的主要目标是：当文档第一次打开时，用户在提示字段中写的任何内容都将是word文档保存时的默认文件名

有更好的方法来实现这一点吗？ 谢谢。

您只需要：

ActiveDocument.Fields.Update

---

在文档模板的“ThisDocument”代码模块中的新宏中。

此字段代码组合将用户在“填写”字段中键入的内容分配给为新文档提供默认文件名的标题属性：

{ TITLE { Fillin "Enter the document title" } }

当从模板创建新文档时，它应自动显示。目前，这也将显示在文档表面上。如果要隐藏，可以将上述内容嵌套在集合字段中：

{ Set bkmTitle { TITLE { Fillin "Enter the document title" } } }

---

设置字段会创建书签，但内容对用户来说是隐藏的。

效果很好。谢谢。不客气：-因为您是StackOverflow的新手：感谢您的有用贡献的正确方法是向上投票向左箭头。要将某个内容标记为答案，请单击左侧的复选标记。这1给出了该人的分数，2让可能有类似要求的其他人知道贡献回答了问题。