Как программно вызвать окно свойств документа в Word и перейти на вкладку «Сводка»?

Question

Я разрабатываю надстройку COM для VB6 для Microsoft Word и добавил на ленту кнопку, которая сохранит документ в базе данных. Но перед сохранением документа я хочу отвести пользователя в окно свойств документа, чтобы он мог заполнить свойства документа (например, Заголовок , Тема и Автор ). Я использую следующее заявление, чтобы вызвать окно:

Application.Dialogs(750).Display

Это работает нормально, но по умолчанию показывает их вкладку General. Поля для Заголовок , Тема и Автор ) находятся на вкладке Сводка. Есть ли способ вызвать это диалоговое окно и перенести его на вкладку Сводка ? Я думал об отправке нажатий клавиш, но у вкладок нет горячих клавиш, связанных с ними.

Мне нужно, чтобы это работало в Word 2007 и Word 2010. Строка выше уже отлично работает в Word 2003, потому что в 2003 нет окна свойств с несколькими вкладками.

Answer 1

Для этого можно вызвать отдельное окно (работает как в Word 2000, 2003, 2007 и 2010):

Application.Dialogs(wdDialogFileSummaryInfo).Display

или

Application.Dialogs(86).Display

Вы также можете программировать противэтот диалог.См. здесь для примера.

Answer 2

Изменение .Display на .Show работает, за исключением того, что вы получаете сообщение об ошибке, если вы нажимаете ESC, поэтому вы должны обернуть его в On Error Resume Next (не знаю, почему).

Sub CustomProperties()
    On Error Resume Next
        Application.Dialogs(750).Show
End Sub

Answer 3

Вы можете записать макрос, а затем выполнить его при необходимости.