Страницы: 1
RSS
Как открыть макрос в макросе
 
привет , подскажите, как открыть макрос в макросе.  
у меня есть два файла    
в первом у меня должен выполниться макрос что бы вывести данные в диапазон .  
во втором файле у меня макрос который эти данные вытаскивает и вставляет к себе.  
так вот , что мне дописать в моем макросе (во втором файле) чтобы сначала выполнился макрос в первом файле вытащил данные,а потом уже во втором запустился нужный макрос и скопировал их себе .  
меня инетересует как сделать один макрос который будет запускать два макроса в разных файлах.:)    
ну что то типа того.  
Спасибо.
50 times helped - they forgot, 1 time refused - they memorized
 
Application.Run "Книга2.xls!Module1.МояПроцедура"  вот так будет работать?
50 times helped - they forgot, 1 time refused - they memorized
 
А попробовать религия не позволяет?
Я сам - дурнее всякого примера! ...
 
не работает, либо я чтото не туда вставляю..  
я имел ввиду не то что я не пробовал , а то будет ли работать вообще ?
50 times helped - they forgot, 1 time refused - they memorized
 
Пример за вас мы должны нарисовать? Навскидку - не указан полный путь к книге.
Я сам - дурнее всякого примера! ...
 
Sub tt()  
Application.Run "C:\Users\strim.y.1\Desktop\MAcro VBA\DDS\RCCP_P2 2.xlsm!Module2.Macro3"    
end sub  
вот так пробовал , ошибка вылетает .
50 times helped - they forgot, 1 time refused - they memorized
 
{quote}{login=The_Prist}{date=24.07.2012 03:21}{thema=}{post}Давайте во всей книге разные имена процедурам и вызывайте так:  
Application.Run "Книга2.xls!МояПроцедура"{/post}{/quote}  
не понял :(    
мне нужно запустить макрос из под другого макроса ...эх, ладно буду гуглить.
50 times helped - they forgot, 1 time refused - they memorized
 
Чего гуглить? Вам же Дима подсказал.    
Вот так работает(раз уж примера от Вас не дождались):  
Sub tt()  
Workbooks.Open "H:\Встреча.xls"  
Application.Run "Встреча.xls!www"  
Workbooks("Встреча.xls").Close 0  
End Sub
Я сам - дурнее всякого примера! ...
 
что нужно здесь поменять что бы работало ?  
 
Workbooks.Open Filename:= _  
"C:\Users\rain.y.1\Desktop\MAcro VBA\DDS\RCCP_P2 2.xlsm"  
Application.Run "C:\Users\rain.y.1\Desktop\MAcro VBA\DDS\RCCP_P2 2.xlsm!Module2.Macro3": Workbooks("RCCP_P2 2.xlsm").Close True 'сохраняем изменения; False - не сохраняем
50 times helped - they forgot, 1 time refused - they memorized
 
даже если имя модуля убрать, не работает
50 times helped - they forgot, 1 time refused - they memorized
 
М-да, туго...  
Workbooks.Open "C:\Users\rain.y.1\Desktop\MAcro VBA\DDS\RCCP_P2 2.xlsm"  
Application.Run "RCCP_P2 2.xlsm!Macro3": Workbooks("RCCP_P2 2.xlsm").Close True
Я сам - дурнее всякого примера! ...
 
извините за тугость, я понимаю как это , все зная , не понимать как другие не могут знать элементарных вещей.  
Спасибо за помощь .
50 times helped - they forgot, 1 time refused - they memorized
 
просто он не работает, не находит макрос    
Application.Run "RCCP_P2 2.xlsm!Macro3"  
хотя он реально есть и книга с этим макросом открыта...
50 times helped - they forgot, 1 time refused - they memorized
 
вот это дело , спасибо большое, теперь работает :)
50 times helped - they forgot, 1 time refused - they memorized
Страницы: 1
Читают тему
Наверх