запуск исполняемого файла из макроса

[caute]

Позволяет ли вордовский макрос запускать программу (скажем, opera.exe или chrome.exe, желательно с параметрами) из папки program files? Либо, как вариант, ярлык *.lnk от этой программы.

[Ципихович Эндрю]

всё что есть у мена по Опере

Dim Opera_Explorer As Variant
        Opera_Explorer = Shell(PathName:= _
                         "C:\Program Files\Opera\opera.exe", WindowStyle:=vbNormalFocus)
NormalFocus - работает таким образом, что открывается Explorer в таком виде окна, в каком он закрывался

    Dim Opera_Explorer As Variant
    Opera_Explorer = Shell(PathName:= _
                           "C:\Program Files\Opera\opera.exe", WindowStyle:=vbNormalFocus)
    Dim Файл_HTML As String
    Файл_HTML = "D:\matrix.htm"
    Файл_HTML = "file://localhost/" & Replace$(Файл_HTML, " ", "%20")
    Файл_HTML = Replace$(Файл_HTML, "\", "/")
    SendKeys String:=Файл_HTML & "{ENTER}"

[caute]

пишет compile error и подсвечивает сроку:
NormalFocus

[Ципихович Эндрю]

Private Sub MySub()

   Dim Opera_Explorer As Variant
    Opera_Explorer = Shell(PathName:= _
                           "C:\Program Files\Opera\opera.exe", WindowStyle:=vbNormalFocus)

End Sub

[caute]

запускает, спасибо
правда, пишет Another user is running this copy of Opera (другая опера НЕ запущена).