VB открыть конкретную версию Excel, когда два установлены - PullRequest
Новая
       5

VB открыть конкретную версию Excel, когда два установлены

1 голос
/ 30 июля 2010

Я смотрю на этот кусок кода, который я получил от здесь , потому что я хотел бы использовать его. Проблема в том, что я использовал 2003 для создания файла «test.xls», но когда я запускаю этот код, он открывается в 2007 году. Есть ли способ заставить его открываться в определенной версии Excel, а не по умолчанию? 

GoSub, GuiOpen
pweb := COM_AtlAxCreateControl(WinExist(), A_Temp . "\test.xls")
pxlb := COM_Invoke(pweb, "Document")      ; Excel Workbook
pxls := COM_Invoke(pxlb, "Worksheets", 1)   ; Excel Worksheet
Return

GuiOpen:
Gui, +Resize +LastFound
Gui, Show, w800 h600 Center, Excel
COM_AtlAxWinInit()
Return
GuiClose:
Gui, Destroy
COM_Invoke(pxlb, "Save")
COM_Release(pxls)
COM_Release(pxlb)
COM_Release(pweb)
COM_AtlAxWinTerm()
ExitApp

1 Ответ

0 голосов
/ 31 июля 2010

Это связано с тем, как файл связан с Windows ... попробуйте это в открытой папке:

Инструменты> Параметры папки> Типы файлов

Найдите файл xls и измените, какая программа открывает его. Если вы не нашли его, просто добавьте его и измените его параметры соответствующим образом.

...