BuiltInDocumentProperties Возвращает неправильное значение

Question

Я хочу получить счетчик страниц для указанного файла, но, похоже, он получает неправильное значение для страниц, он выводит счет как 3, когда он действительно равен 6. Используемый код следующий:

Dim myWordDoc As Microsoft.Office.Interop.Word.Document 
    Dim myWordApp As Microsoft.Office.Interop.Word.Application 
    myWordApp = New Microsoft.Office.Interop.Word.Application 
    myWordDoc = myWordApp.Documents.Open("C:\Users\user\Desktop\TestInsert.docx") 
    MsgBox(myWordDoc.BuiltInDocumentProperties("Number of Pages").value) 

Answer 1

Я нашел решение проблемы, описанной выше, то, что мне нужно было сделать, это сказать ей, чтобы она была отформатирована после открытия документа. Код, который сработал:

Dim myWordDoc As Microsoft.Office.Interop.Word.Document 
    Dim myWordApp As Microsoft.Office.Interop.Word.Application 
    myWordApp = New Microsoft.Office.Interop.Word.Application 
    myWordDoc = myWordApp.Documents.Open("C:\Users\user\Desktop\TestInsert.docx") 
    myWordDoc.Repaginate() 
    MsgBox(myWordDoc.BuiltInDocumentProperties("Number of Pages").value) 

Я думаю, что там есть лучшее решение, но выше работало для меня.