VB.NET GetObject (, «Excel.Application») не удается запустить Excel

Question

У меня есть один, видимый, запущенный экземпляр Excel 2013. Я уже выполнил быстрый ремонт и онлайн-ремонт и ждал Ремонт полностью закончен.

Если я запускаю этот VBA из Word, я могу получить ссылку на запущенное приложение Excel:

Sub WordMacro() 
    'This works 
    Dim o As Object 
    Set o = GetObject(, "Excel.Application") 
End Sub 

Но если я запускаю это из Visual Studio 2013 Professional под .NET 4.5, он терпит неудачу:

Option Strict Off 

Module Module1 

    Sub Main() 

     Dim o As Object 
     'Cannot create ActiveX component. 
     o = GetObject(, "Excel.Application") 

     'But this does create a new, hidden instance 
     o = CreateObject("Excel.Application") 
    End Sub 

End Module 

Есть ли какое-либо соображение безопасности, которое мне не хватает, или мне просто нужно сделать полную деинсталляцию/переустановку Office?

Answer 1

В .NET вы должны запустить excel.exe до того, чтобы получить экземпляр:

Shell("C:\Program Files (x86)\Microsoft Office\Office14\Excel.exe", _ 
      AppWinStyle.MinimizedFocus) 
Xc = GetObject(, "Excel.Application")