Ошибка ActiveX

[WorldMaster]

Здравствуйте.

есть такой код:

Dim x As New Class1
Dim Answer As String

Sub Запуск_класса_модуля_Module1()
    Set x.App = Word.Application
    Set x.DNSD = New CoreLib.DNSDInteraction   <- тут ошибка 429 activex can't create object
...
End Sub

В версиях Word до 2010 все отлично работало. А свыше 2010 начались какие то пляски с бубном. Вроде все галки в безопасности проставлены. Все разрешено всем и вся. Но ошибка валится и все тут.
Может кто знает как это побороть?? И вообще в чем проблема?