Программно подключить Microsoft Word 11.0 (12.0) Object Library

[The_Prist]

Посмотрите правильно ли записана строка:

ThisWorkbook.VBProject.References.AddFromFile Application.Path & Application.PathSeparator & "MSWORD.OLB"

Пробел должен быть только между .AddFromFile и Application.Path. Через отладку проверьте, какой путь возвращает строка:

Application.Path

действительно ли возвращает путь "C:\Program Files\Microsoft Office\Office12".

Еще: Для подключения библиотек программно необходимо проставить доверие к проекту VBA. Для 2007(я понял у Вас он установлен)
Меню-Параметры Excel-Центр управления безопасностью-Параметры макросов-поставить галочку "Доверять доступ к объектной модели проектов VBA

И наконец:
попробуйте запустить код так:

ThisWorkbook.VBProject.References.AddFromFile "C:\Program Files\Microsoft Office\Office12\MSWORD.OLB"

[SilverSmallFish]

Здравствуйте мои помощники!

Viter.alex пошагово я проходила -

ThisWorkbook.VBProject.References.A ddFromFile Application.Path & Application.PathSeparator & "MSWORD.OLB"

- ошибка

Объясняю ситуацию -

У меня установлен Excel 2003 и 2007, пишу, ну пытаюсь, в 2003, подключена библиотека 12.0, у мои пользователей, по-разному, у кого 2003, у кого 2007. Если ставлю где 2003, то ругается что бы подключить 11.0, а на 12.0 MISSING..... вот здесь и встаём, а в ручную каждому подключать как то не приемлемо, хотелось бы оптимизировать этот процессик.

Надеюсь объяснила понятно.

Возможно я в лесу, но тогда укажите дорожку пожалуйста.

Опыта VB у меня маловато, поэтому местами винегреты Viter.alex.

[SilverSmallFish]

The_Prist, здравствуйте!

1) строка:

ThisWorkbook.VBProject.References.A ddFromFile Application.Path & Application.PathSeparator & "MSWORD.OLB"

записана правильно

2) путь возвращает правильно "C:\Program Files\Microsoft Office\Office12".

3) галочка "Доверять доступ к объектной модели проектов VBA" у меня установлена и 2003 и 2007.

4) Запускаю код

ThisWorkbook.VBProject.References.A ddFromFile "C:\Program Files\Microsoft Office\Office12\MSWORD.OLB"

- и как вы думаете, заработала!

Спасибо за помощь!

[viter.alex]

Сообщение от SilverSmallFish

…
У меня установлен Excel 2003 и 2007, пишу, ну пытаюсь, в 2003, подключена библиотека 12.0, у мои пользователей, по-разному, у кого 2003, у кого 2007. Если ставлю где 2003, то ругается что бы подключить 11.0, а на 12.0 MISSING..... вот здесь и встаём, а в ручную каждому подключать как то не приемлемо, хотелось бы оптимизировать этот процессик.…

Тогда тем более вам не нужно раннее связывание. Используйте позднее, т.е. вместо Dim myWord As Word.Application напишите Dim myWord As Object и дальше через GetObject или CreateObject получайте объект и работайте с ним.
Ну или нужно подключать библиотеку каждый раз при октрытии книги и отключать при закрытии.

[SilverSmallFish]

viter.alex спасибо за совет!