我有一个旧的Word宏,应该通过调用
来获取文档标题DocTitle = ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle)
或
Set oBuiltInProps = ActiveDocument.BuiltInDocumentProperties
strValue = oBuiltInProps.Item("Title").Value
在一个新文档中,这是在调用SaveAs(我也尝试过SaveAs2)之后完成的,这用来确保文档的第一句填充了Documenttitle属性。然而,这似乎不再起作用,我只是得到一个空白字符串。
这是在我的开发机器上所以它可能有一个单词设置我没有设置,但我不记得了。
有谁知道如何强制保存文档以创建DocumentTitle?
我正在使用Word 2010
(我使用Word 2010进行了单独的工作安装,但最初是为97和97编写的)
答案 0 :(得分:2)
如果我理解正确并且您正在寻找一种简单地在Word 2010中获取文档标题的方法,则可以使用以下宏:
Dim Title As String
Title = ActiveDocument.Name
MsgBox (Title)