Обратиться к метке, находящейстя в др. процедуре

[Blame]

Добрый день!

1) Подскажите, пожалуйста, как из одной процедуры можно сделать ссылочку на метку, находящуюся в др. процедуре? как к ней можно обратиться?

Есть основная процедура Main, в которой вызывается вспомогательная процедура letter_chech

Sub Main()
........
call letter_chech
Label_letter:
........
End Sub


Вызываемая процедура, содержит условие, при выполнении которого происходит переход назад к основной процедуре.

Sub letter_chech()
....
Sheets("LETTERS").Select
If IsEmpty(Cells(2, 5)) Then GoTo Label_letter

........
End Sub

Как можно вернуться к продолжению выполнения кода процедуры Main, при выполнении условия из процедуры letter_chech ?


2) И еще один вопросик. Какая команда указывает на продолжение выполнения кода ? do event? То есть:

Sub letter_chech()
....
Sheets("LETTERS").Select
If IsEmpty(Cells(2, 5)) Then GoTo Label_letter
else Do Event 'верно?
........
End Sub

То есть, если выполняется условие, то переход к метке, а если нет,- то продолжить выполнение процедуры letter_chech

___________
Спасибо!

[Hugo121]

If IsEmpty(Cells(2, 5)) Then exit sub

А DoEvents передаёт управление системе, чтоб Вы могли мышкой пошевелить или что-то другое делать, пока код перебирает ваши миллионы ячеек. Кстати, на массивах-то быстре было бы. Раз так в 43

[Blame]

Hugo121

Спасибо большое! Это ведь универсальное решение к моим обоим вопросам сразу, верно?
Если условие выполняется и exit sub - то выход из вспомогательной процедуры, а иначе,-продолжение действий этой вспомогательной процедуры. Правильно?

[Hugo121]

Да

[Blame]

kiitos!