vba - 调用 BuiltInDocumentProperties(wdPropertyTitle) 返回空字符串

Question

我有一个旧的 Word 宏，它应该通过调用来获取文档标题

DocTitle = ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle)

或者

    Set oBuiltInProps = ActiveDocument.BuiltInDocumentProperties
    strValue = oBuiltInProps.Item("Title").Value

在新文档上，这是在调用 SaveAs（我也尝试过 SaveAs2）后完成的，该调用用于确保文档的第一句填充了 Documenttitle 属性。然而，这似乎不再起作用，我只是得到一个空白字符串。

这是在我的开发机器上，所以它可能有一个我没有设置的 word 设置，但我不记得了。

有谁知道我如何强制保存文档以创建 DocumentTitle？

我正在使用 Word 2010

（我有一个使用 Word 2010 的单独工作安装，但最初是为 Word 97 编写的）

score 2 · Accepted Answer

如果我理解正确并且您正在寻找一种方法来简单地获取 Word 2010 中的文档标题，您可以使用以下宏：

Dim Title As String
Title = ActiveDocument.Name
MsgBox (Title)

1 回答 1