Здравствуйте, moon_light, Вы писали:
_> Создаю файл Word, Надо изменить его свойства: тему, название, автор, руководитель, учереждение ... и т.п.
_> Была попытка MsgBox ActiveDocument.ActiveTheme . Выдает none
_> Хоть там есть строка символов.
_>На ActiveDocument.ApplyTheme он вообще говорит ошибки. 8(
_> Что делать ? Как изменять эти свойства Document
Посмотри на свойства Document.BuiltInDocumentProperties
Dim p As DocumentProperty
On Error Resume Next
For Each p In ActiveDocument.BuiltInDocumentProperties
Debug.Print p.Name, ;
Debug.Print """" & p.Value & """";
Debug.Print
Next p
Или
Debug.Print ActiveDocument.BuiltInDocumentProperties("Author").Value