Коллеги !
Нет ли в Excel средств запуска exe-файла, кроме функции Shell, входящей в состав VBA ?
Запуск exe-файла в Excel ?
Модератор: Naeel Maqsudov
- EducatedFool
- Сообщения: 196
- Зарегистрирован: 06 апр 2008, 14:03
- Откуда: Россия, Урал
- Контактная информация:
Есть способы, причем много.
Вот так можно запустить приложение Office:
Ну и здесь ещё пара способов: (есть и другие, но лень вспоминать)
http://www.programmersforum.ru/showthread.php?t=50634
По поводу использования Shell можно почитать это:
http://www.programmersforum.ru/showpost ... ostcount=6
Вот так можно запустить приложение 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
Макросы для Excel, Word, CorelDRAW. Быстро, профессионально, недорого. http://ExcelVBA.ru/
Благодарности принимаются на кошелёк WebMoney: R318574877619 и Яндекс.Деньги: 41001335672216
Благодарности принимаются на кошелёк WebMoney: R318574877619 и Яндекс.Деньги: 41001335672216
Уважаемый коллега !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
Ваша программа
Private Sub Form_Load()
MyPath = "c:\"
Set WshShell = CreateObject("WScript.Shell")
WshShell.CurrentDirectory = MyPath
'Debug.Print WshShell.CurrentDirectory
Call Shell("cmd.exe")
End Sub
, в которой начальная папка задается предварительно, - это то, что надо !
Я Ваш должник !