Appel à BuiltInDocumentProperties (wdPropertyTitle) retourne une chaîne vide

Question

J'ai une vieille macro Word qui est censé obtenir le titre du document en appelant

DocTitle = ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle) 

ou

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

Sur un nouveau document ce qui est fait après un appel à SaveAs (j'ai également essayé SaveAs2) qui s'assurait que la première phrase du document peuplait la propriété Documenttitle. Cependant, cela ne semble plus fonctionner et je reçois juste une chaîne vide.

Ceci est sur ma machine Dev donc il est possible qu'il y ait un réglage dans le mot que je n'ai pas défini, mais je ne m'en souviens pas.

Est-ce que quelqu'un sait comment je peux forcer l'enregistrement d'un document pour créer le DocumentTitle?

J'utilise Word 2010

(j'ai séparé l'installation de travail en utilisant Word 2010, mais a été origionally écrit et mot 97)

Answer 1

Si je comprends bien et que vous êtes à la recherche d'un moyen de simplement obtenir le titre du document dans Word 2010, vous pouvez utiliser la macro suivante:

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