Здравствуйте, globus, Вы писали:

G>Здравствуйте, Dmitriy Yakovlev, большое спасибо за Вашу поддержку, вот написал

Всегда рад

G>

G>Dim o As Application // или Object - все равно

G>Sub AutoExec()
G>    Set obj = CreateObject("PXCOfficeAddin.Addin")
G>    Set o = ThisDocument.Application
G>    obj.Initialize o.Application
G>End Sub
G>

G>Так работает Вот не понимаю только почему так работает а так

G>

G>obj.Initialize o
G>

G>не работает...

Ну, возможно, у нас различия в IDL. Я не особо большой спец, но могу предположить что из-за того у тебя в определении параметра IDispatch *pDisp используется [in], то на вход должен прийти readonly объект и, возможно, для полного соответствия типов тебе приходится передавать именно readonly свойство Application объекта Application. Попробуй убрать [in], посмотри что получится.

Property Application As Application
    read-only
    Member of Word.Application