|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.12.2010, 18:37 | #1 |
Регистрация: 21.12.2010
Сообщений: 6
|
Не могу вызвать процедуру С ПАРАМЕТРАМИ из другой книги
Не могу вызвать процедуру с параметрами из другой книги, которая открыта и активна... Без передачи параметров вызываю без проблем при помощи
Код:
Код:
Надеюсь на вашу помощь! |
21.12.2010, 19:12 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
а Вы в этом Module_New.mainbook_name уверены?
в самом начале BeginOfAll поставьте какой-то MsgBox - будете уверены, что вошли в BeginOfAll (вызов состоялся, а ошибка внутри из-за парметров, или из-за вызова с дургой книги).
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
22.12.2010, 18:41 | #3 |
Регистрация: 21.12.2010
Сообщений: 6
|
Код:
в процедуре BeginOfAll я вставил месседжбоксы под каждый отправляемый параметр... собственно говоря вот и сам пример! |
22.12.2010, 19:35 | #4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
в
Function CallShablonSubBeginOfAllSParam(Book Name As String, TypeOtchet As Integer, MesNumb As String, MesName As String, Year As Integer) ' вызываем процедуру Начало в шаблоне, а также обрабатываем ошибку если ее нет строку вызова написал так: Call Run(BookName & "!BeginOfAll", ActiveWorkbook.Name, TypeOtchet, MesNumb, MesName, Year) ' вызываем процедуру Начало первый параметр, которого я так и не понял заменил на ActiveWorkbook.Name. в результате принял сообщения от BeginOfAll из TestBook2.xls. у вас в комментари указана причина ошибки "а также обрабатываем ошибку если ее нет" - Вы вызывали макрос, с таким имененм, которого нет в TestBook2.xls во-первых: надо было правильно имя функции указать BeginOfAll, а не BeginOfAllBEZParam - там нет такой функции. во-вторых: для Run первый параметр имя выполняемого какроса, а дальше параметры, которые ему (вызываемому макросу) нужны для работы. Имя макроса и параметры нельзя было запихивать в одну строку. Для Run все это было именем макроса, понятно что макроса с таким именем BookName & "!BeginOfAll, ActiveWorkbook.Name, TypeOtchet, MesNumb, MesName, Year)" не было в TestBook2.xls.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
Последний раз редактировалось IgorGO; 22.12.2010 в 19:39. |
24.12.2010, 12:34 | #5 |
Регистрация: 21.12.2010
Сообщений: 6
|
извините, за корявый скрипт... я его вытащил из кода проекта, отредактировал, но случайно запаковал и разместил здесь не полностью откорректированную версию!
все отлично работает! СПАСИБО ОГРОМНОЕ!!!!! |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
вызвать процедуру | fize | Помощь студентам | 4 | 14.01.2010 01:51 |
как вызвать процедуру? | ai\ekcah^p | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 25.06.2009 11:21 |
Как вызвать процедуру ??? | Marat | Помощь студентам | 8 | 02.03.2007 15:11 |