Страница 1 из 1
Запуск exe-файла в Excel ?
Добавлено: 24 дек 2009, 09:30
Хфедя
Коллеги !
Нет ли в Excel средств запуска exe-файла, кроме функции Shell, входящей в состав VBA ?
Re: Запуск exe-файла в Excel ?
Добавлено: 24 дек 2009, 13:15
EducatedFool
Есть способы, причем много.
Вот так можно запустить приложение Office:
Код: Выделить всё
[color=darkblue]Sub[/color] test()
Application.ActivateMicrosoftApp xlMicrosoftWord
[color=darkblue]End[/color] [color=darkblue]Sub[/color]
Ну и здесь ещё пара способов: (есть и другие, но лень вспоминать)
http://www.programmersforum.ru/showthread.php?t=50634
По поводу использования Shell можно почитать это:
http://www.programmersforum.ru/showpost ... ostcount=6
Re: Запуск exe-файла в Excel ?
Добавлено: 24 дек 2009, 14:48
Хфедя
Уважаемый коллега !
Ваша программа
Private Sub Form_Load()
MyPath = "c:\"
Set WshShell = CreateObject("WScript.Shell")
WshShell.CurrentDirectory = MyPath
'Debug.Print WshShell.CurrentDirectory
Call Shell("cmd.exe")
End Sub
, в которой начальная папка задается предварительно, - это то, что надо !
Я Ваш должник !