Форум по VBA, Excel и Word

Word => Макросы в Word => Тема начата: Rengame113 от 04 Июнь 2018, 23:12

Название: VBA: Запуск макросов из макроса
Отправлено: Rengame113 от 04 Июнь 2018, 23:12
Необходимо создать поиск на фразу в документе «Привет друг». Если она находится в документе, то выполняется Макрос1 если нет, то Макрос 2.
Название: Re: VBA: Запуск макросов из макроса
Отправлено: Администратор от 04 Июнь 2018, 23:46
В данном примере нет поиска.
Запускаются макросы, которые находятся в том же файле (эксель-файле, надстройке).
Если макросы в других файлах, то этот способ не подходит.

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

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

End Sub
Название: Re: VBA: Запуск макросов из макроса
Отправлено: Rengame113 от 07 Июнь 2018, 21:01
Спасибо