Sub трпр()
   Процедура_1
   Процедура_2
   Процедура_3
End Sub

Sub трпр()
   If Function_1 = True Then
        If Function_2 = True Then
            Процедура_3
        End If
   End If
End Sub

Global rabota1 As Boolean
Global rabota2 As Boolean
Global rabota3 As Boolean

rabota1 = True
Exit Sub

Sub процедура2()
   if rabota1 = True Then
      ' твои код
      ' например
      Do ' допустим цикл
          DoEvents
      Loop While (условие)
      rabota2 = True
      Exit Sub
   End If
End Sub

На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика.

Продолжая использовать сайт, вы даёте согласие на обработку файлов cookie, необходимых для работы сайта. Другие опции вы можете выбрать по своему усмотрению.

По нижеприведенным ссылкам мы можете ознакомиться с действующим на сайте пользовательским соглашением и политикой конфиденциальности.

Пользовательское соглашение
Политика конфиденциальности

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы