Консультация № 28982
05.11.2005, 20:47
0.00 руб.
0 7 2
Здравствуйте эксперты.
как из VBA запустить внешнюю exe программу?
спасибо.

Обсуждение

Неизвестный
05.11.2005, 21:23
общий
это ответ
Здравствуйте, gvozdok!
С помощью первого примера в приложении можно запустить всё что запускается в системе(99%).
С помощью второго EXE COM и ещё какие то, не помню.



Приложение:
Пример №1Option ExplicitPrivate Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPrivate Sub Command1_Click()ShellExecute Me.hwnd, "open", "c:\windows\system32\calc.exe", "", "", 0End SubПример №2Option ExplicitPrivate Sub Command1_Click()Shell "c:\windows\system32\calc.exe", vbNormalFocusEnd Sub
Неизвестный
06.11.2005, 00:42
общий
По моему приведенные примеры это для Вижл Бейсика а мне нужно для ВБА, можно конкретный пример.
Неизвестный
07.11.2005, 12:52
общий
это ответ
Здравствуйте, gvozdok!

Да поможет тебе shell(PathName as String, [WinStyle as vbAppWinStyle]) as Double
Неизвестный
11.11.2005, 13:11
общий
А разве они не работают в VBA?
Неизвестный
11.11.2005, 13:23
общий
Эх, действительно работают- сорри ;). Я перепутал VBA с VBScript, можно примеры тогоже самого для VBS? спасибо заранее.
Неизвестный
11.11.2005, 17:38
общий
Пример VBScript написать не могу но там вроде нужно создать какой то объект с помощью команды create. Поищи в этом направлении.
Неизвестный
11.11.2005, 18:47
общий
Ок. пошаримс.
Форма ответа