Автор Тема: VBA: Запуск макросов из макроса  (Прочитано 1092 раз)

Оффлайн Rengame113

  • Посетитель форума
  • Сообщений: 97
Необходимо создать поиск на фразу в документе «Привет друг». Если она находится в документе, то выполняется Макрос1 если нет, то Макрос 2.

Оффлайн Администратор

  • Administrator
  • Сообщений: 1939
Re: VBA: Запуск макросов из макроса
« Ответ #1 : 04 Июнь 2018, 23:46 »
В данном примере нет поиска.
Запускаются макросы, которые находятся в том же файле (эксель-файле, надстройке).
Если макросы в других файлах, то этот способ не подходит.

Макрос
Sub макрос()

    Dim var
   
    ' Запись в переменную текста.
    var = "Привет друг"
   
    ' Если в переменной текст "Привет друг".
    If var = "Привет друг" Then
        имя_модуля1.имя_процедуры1
    ' Если в переменной нет текста "Привет друг".
    Else
        имя_модуля2.имя_процедуры2
    End If

End Sub

Оффлайн Rengame113

  • Посетитель форума
  • Сообщений: 97
Re: VBA: Запуск макросов из макроса
« Ответ #2 : 07 Июнь 2018, 21:01 »
Спасибо