Как открыть конкретную версию Word 2007/2010 в Excel
У меня установлены оба Word 2007 и 2010. Мне нужно открыть Word из Excel, но мне нужно указать, какую версию мне нужно открыть в VBA.
Я пробовал позднее связывание
Dim wordApp2007 As Object
Dim wordApp2010 As Object
Set wordApp2007 = CreateObject("Word.Application.12")
wordApp2007.Visible = True
Set wordApp2010 = CreateObject("Word.Application.14")
wordApp2010.Visible = True
но оба открывают Word 2010
Я также пробовал раннее связывание с помощью
Dim wordApp As Word.Application
Set wordApp2007 = New Word.Application
wordApp2007.Visible = True
и установка ссылок на объектную модель Word 12.0, но это по-прежнему открывает Word 2010
Если я зарегистрирую каждую версию Word, используя
"C:\Program Files\Microsoft Office\Office12\WINWORD.EXE" /regserver
"C:\Program Files\Microsoft Office\Office14\WINWORD.EXE" /regserver
затем открывается зарегистрированная версия, но затем я не могу открыть незарегистрированную.
Может кто-нибудь помочь и показать мне, как открыть конкретную версию Word в Excel с помощью VBA?
Спасибо
Изменить: Пример кода ....
Option Explicit
Dim wordApp2007 As Word.Application
Sub Word_InfoEarly()
'early binding
Set wordApp2007 = New Word.Application
wordApp2007.Visible = True
'other Stuff
Stop
wordApp2007.Quit
Set wordApp2007 = Nothing
End Sub
Sub Word_InfoLate()
Dim wordApp2007 As Object
Dim wordApp2010 As Object
Set wordApp2007 = CreateObject("Word.Application.12")
wordApp2007.Visible = True
Set wordApp2010 = CreateObject("Word.Application.14")
wordApp2010.Visible = True
'other Stuff
Stop
wordApp2007.Quit
Set wordApp2007 = Nothing
wordApp2010.Quit
Set wordApp2010 = Nothing
End Sub