Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ / 15 сообщений из 15, страница 1 из 1
29.04.2004, 11:51
    #32502229
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
мне тут вчера некто марван обьяснял обьяснял как надо сделать, но я нифига не понял и у меня нифига не вышло...

мне надо !!!! сделать так чтобы ексель перед тем как сделать апликейшон куит, запустил бат файл.
у меня все время получается так что он мне этот бат открывает как экселевский документ.
если просто на бат кликаеш то все нормально а через макрос не хочет.
ну будьте снисходительны напишите вы мне эту строку ...))))
...
Рейтинг: 0 / 0
29.04.2004, 11:53
    #32502242
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
Пример из хелпа:

Dim RetVal
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) ' Run Calculator.
...
Рейтинг: 0 / 0
29.04.2004, 12:11
    #32502305
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
блин да ошибку пишет....
открывает мне его как ескелефский док
...
Рейтинг: 0 / 0
29.04.2004, 12:15
    #32502318
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
RetVal = Shell("cmd my.bat", 1)

?
...
Рейтинг: 0 / 0
29.04.2004, 12:17
    #32502320
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
с что за сmd?
...
Рейтинг: 0 / 0
29.04.2004, 12:20
    #32502336
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
вот мая строка
'RetVal = Shell("c:\diplom\data\arenda.bat", 1) - он благополучно отрывает его как есельевский док
RetVal = Shell("cmd c:\diplom\data\arenda.bat", 1) ???? - он открывает баттт ...но не мой... кароче так бат не выполняет команду которая находиться в нем....
_____________________
уж прастите я не програмер))))))))
...
Рейтинг: 0 / 0
29.04.2004, 12:24
    #32502345
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
весь макрос мой целиком

Sub change_mash()
RetVal = Shell("c:\diplom\data\arenda.bat", 1)
Application.Quit
End Sub

прально??????
...
Рейтинг: 0 / 0
29.04.2004, 12:25
    #32502346
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
с что за сmd?

"Аналог" (если можно так выразиться) command.com из DOS'a
...
Рейтинг: 0 / 0
29.04.2004, 12:32
    #32502370
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
дык как прально написатьто???
народ ну памагите...
последняя ошибка и диплом готов
...
Рейтинг: 0 / 0
29.04.2004, 12:47
    #32502416
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
последняя ошибка и диплом готов
Дипломы пишем только за пиво :)
----------------------------------

Ага - у меня и без cmd сработало :)
Может в бате ошибка, мне пришлось в бате полные пути писать, а то он не понимает в какой он директории запущен :)

Текст бат-файла в студию!!!
...
Рейтинг: 0 / 0
29.04.2004, 12:53
    #32502436
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
текс бата (он нужен (тока не смейся) для запуска другой книги екселя.)

сd c:\diplom\data
start Расчет_гидросистемы.xls

значит так. две книги в екселе,одна где происходит выбор машины из списка и одна где собственно происходит расчет и ввод исходных параметров,..
процес работы такой
1 - запускаем 1 книгу
а) появляется форма с выбором машин
б) выбирает машину жмем далее
в) эта книга закрывается открывается вторая
2 - вторая книга запустилась
а) появляется форма куда вводим исходные параметры
б) жмем далее видим результаты расчета
все работает.
нооооооо!!!!
если жмем кнопку "вернуться к выбору машин" то открывается первая книга а вторая не закрывается и все .... гаме овер
ниче не могу сделать...
но знаю изза чего фсе это
а это все из за того что : во второй книге помимо добавленой формочки есть дополнительная менюшка.... прямо в экселе... меню файл и там все что нужно.. так вот если эту меню убрать - все чикипуки... все работает все закрывается и открывается....
а если оставить то ниче не работает...
я уже и так и сяк - не знаю что делать - в вижуале это первый опыт у меня... да и ваще програмированием не занимался никогда.
я придумал так)))))
беру пишу бат файл который запускает первую книгу.
во второй книге делаю макрос который сначала запускает бат фай а потом делает аппликейшон куит...


вот и фся проблема...
...
Рейтинг: 0 / 0
29.04.2004, 13:01
    #32502468
paparome
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
Почему не работает из-за менюшки - это я не знаю

А вот бат - это уже наворот
Не проще сразу новую книгу открывать, а старую закрывать?

Что-то типа:
Код: plaintext
1.
2.
3.
4.
    Workbooks.Open Filename:= _
        "C:\Мои документы\Книга2.xls"
    Windows("Книга1.xls").Activate
    ActiveWindow.Close
...
Рейтинг: 0 / 0
29.04.2004, 15:09
    #32502838
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
...
Рейтинг: 0 / 0
30.04.2004, 07:25
    #32503668
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1) - вот эта строка ваще не работает какой бы файл я не написал...
может это изза того что у меня офис2003??? а?
я уже не знаю куда деваться...
не а вот по поваду
Workbooks.Open Filename:= _
"C:\Мои документы\Книга2.xls"
Windows("Книга1.xls").Activate
ActiveWindow.Close
-----
так этот метод савсем не подходит...
получается так...
после открытия второй книги в ней создается "моеменю" - типа управление файлом - без нее низя...
и когда я пытаюсь закрыть вторую книгу и открыть первую то ниче не получается изза того что меню не пропадает - получается что книга 2 не может закрыться... хотя она фактически закрыта...
меню это пропадет после того как будет сделан апликейшон куит
вот для повторного запуска экселя и нужен этот бат
...
Рейтинг: 0 / 0
30.04.2004, 13:00
    #32504363
А.Ромейко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ
я тут мимо проходил...

м.б. перед закрытием второго файла попробовать закрыть, созданный Вами объект "моеменю" (Вы же его как то создаёте, Open или Set)? Как закрыть, то ли Hide (если был Open ), то ли Nothing (если был Set), - не подскажу, надо пробовать...
-------------
"Будете проплывать мимо, проплывайте. Симбад...(литвинов ас)"
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ВСЕ равно туплю... КАК ЗАПУСТИТЬ МАКРОСОМ БАТ ФАЙЛ / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]