Для информации тем, кто пойдет тем же путем:
1) Все это добро будет работать, если это допускает политика безопасности собственно Excel. Начиная с версии XP это
Пункт меню Excel: Сервис \ Макрос \ Безопасность \ Закладка "Надежные издатели"
переключатель "Доверять доступ к Visual Basic Project"
Если этот переключатель будет выключен, то пользователь будет видет сообщение:
Цитата:
Функция VFProject возвратила код ошибки ..., что означает (unknow)
И макрос вообще не будет создан. Вылет произойдет на команде
prj = Workbook.VBProject();
2) Этот код практически один-в-один можно перенести в Word. Естесственно заменив ссылку на рабочую книгу, ссылкой на документ.
Причем в Word для элементов коллекции BuiltinDocumentProperties() можно использовать не только названия, но и константы. В Excel соответствующих констант нет, хотя, конечно, можно напрямую писать числа.