Вызов подпрограммы из другого модуля в VBA

Question

Вызов подпрограммы из другого модуля в VBA

37

Можно ли вызвать функцию от одного Module к другому?

У меня есть следующий код:

Sub MAIN()
    Call IDLE
End Sub

MAIN находится в Module1
IDLE находится в Module2 и определяется как: Sub IDLE()

Nimrod 10 май 2010, в 17:41

Источник

Теги:

vba

module

call

2 ответа

0

Но почему это не работает для меня

Sub Mode1() Диапазон ( "B2" ) = "100" INRValue = Листы ( "Лист1" ). Диапазон ( "B2" ) Режим вызова2 End Sub

Sub Mode2() MsgBox module2.INR1Value End Sub

Есть ли какое-либо условие для работы этого кода

mithun nair 30 дек. 2017, в 14:47

Ещё вопросы

dcp · Accepted Answer · 2010-05-10T17-25-00.000Z

53

Лучший ответ

Префикс вызова с помощью модуля 2 (например, Module2.IDLE). Я предполагаю, что после того, как вы спросили об этом, у вас есть IDLE, определенное несколько раз в проекте, в противном случае это не обязательно.

dcp 10 май 2010, в 17:25

0

Благодарю. оно работает :)
Nimrod 10 май 2010, в 16:32
0

Пожалуйста. Пожалуйста, не забудьте принять ответ (нажмите на чек) :).
dcp 10 май 2010, в 16:44
0

Если вам нужно добавить префикс к имени модуля, у вас есть проблема. Это не должно быть необходимо.
Fionnuala 10 май 2010, в 19:18
0

@Remou - Вы не правы. Во-первых, ОП уже сказал, что решил его проблему, не зная, почему этого вам недостаточно. Во-вторых, и вы можете попробовать это сами, создайте Module1 и Module2 и создайте в каждом из них sub, называемый Sub1. Затем попробуйте отключить Module1 или Module2 от имени Sub1 при вызове его из подпрограммы в Sheet1 и дайте мне знать, что происходит, когда вы пытаетесь Debug-> Compile из строки меню VBA.
dcp 10 май 2010, в 19:24
5

Если вы создадите две процедуры с одинаковым именем, проект не будет скомпилирован, и ошибка должна быть исправлена. В OP упоминаются две процедуры, одна из которых называется Main, а другая - Idle. Должна быть возможность вызывать Idle из Main или даже из непосредственного окна без добавления префикса к нему, если это два стандартных модуля. Если это не так, информация отсутствует, и вопрос является неполным. Важно, чтобы ответы были действительными для других людей, желающих найти ответ.
Fionnuala 10 май 2010, в 19:43
0

@Remou - я только что создал два модуля, module1 и module2, и создал подпрограмму с именем Sub1 в module1 и module2, и проект скомпилирован нормально. Ты попробовал то, что я предложил себе? Почему вы говорите, что проект не будет компилироваться? Я предположил здесь (возможно, неправильно, я обновил свой ответ, чтобы отразить это предположение), что у OP был тот же самый sub, объявленный в 2 модулях, поэтому у них была проблема. Но опять же, я до сих пор не понимаю, почему вы не думаете, что у вас не может быть 2 процедур с одинаковым именем, это просто неправильно.
dcp 10 май 2010, в 19:53
0

Запустите процедуру из непосредственного окна. Вы должны получить «Ошибка компиляции. Обнаружено неоднозначное имя: Idle».
Fionnuala 10 май 2010, в 19:57
0

Вот КБ support.microsoft.com/kb/817411
Fionnuala 10 май 2010, в 20:04
0

@Remou - Правильно, и эта ошибка исчезнет, если вы добавите префикс вызова к module1 или module2, что и было тем, что я говорил. Но вы сказали: «Если вы создадите две процедуры с одинаковым именем, проект не будет скомпилирован», что неверно. Вы можете иметь 2 подпрограммы с одинаковыми именами, просто при вызове подпрограммы вы должны использовать префикс соответствующего модуля. Есть смысл?
dcp 10 май 2010, в 20:06
0

Я думаю, что лучшее решение - переименовать процедуру, чтобы избежать двусмысленности, но это не главное. В OP упоминаются два модуля с двумя разными именами, и в этом случае префикс не должен быть необходим, как я изначально говорил.
Fionnuala 10 май 2010, в 20:15
0

Это также работает с Application.Run ? Т.е. я могу сделать Application.Run(Module1.Foo) . Если так, то что, если также Module1 является внешней ссылкой и поэтому существует в отдельном файле?
mchen 30 июль 2013, в 23:03
0

@ Мило Чен: Я не уверен, тебе стоит попробовать и посмотреть.
dcp 31 июль 2013, в 12:28
0

Я не совсем понимаю, почему, но это исправило это и для меня.
David Morin 18 июль 2014, в 12:41

Показать ещё 11 комментариев