1 Тема от stas

  • stas
  • Участник
  • Неактивен

Тема: VBS: Открыть новый файл Excel в том же окне

Уважаемые форумчане! Кто сталкивался, как решить проблемку: в Excel уже открыт файл  Книга1,   VBS скриптом открывается файл Книга2.  В этом файле автоматические макросы в событии Workbook_Open. Но они не срабатывают, потому что Книга2 открывается в другом экземпляре Excel. То есть, при открытии скриптом создаётся ещё одно окно Excel !
Как открыть Книга2 в том же окне, что и Книга1?
Вот мой код VBS:

Option Explicit 
Dim xls

Set xls= CreateObject("Excel.Application") 
xls.Visible = True
xls.Workbooks.Open("C:\Documents and Settings\Я\Рабочий стол\Книга2.xlsm")

Ткните носом пожалуйста, а то всю сеть перерыл и бестолку!

2 Ответ от stas (изменено: stas, 2016-09-15 19:06:36)

  • stas
  • Участник
  • Неактивен

Re: VBS: Открыть новый файл Excel в том же окне

Отбой! Проблему решил, правда кривовато. Берите кто хотите.
Этот код имитирует двойной щелчок мышкой на файле.
Единственное требование  - excel должен быть открыт заранее, иначе фай не откроется.

Set oShell = CreateObject("Shell.Application")
Set Folder = oShell.NameSpace("C:\Documents and Settings\Я\Рабочий стол")
Set File = Folder.ParseName("Книга2.xlsm")
File.InvokeVerb