Необходимо создать поиск на фразу в документе «Привет друг». Если она находится в документе, то выполняется Макрос1 если нет, то Макрос 2.
В данном примере нет поиска.
Запускаются макросы, которые находятся в том же файле (эксель-файле, надстройке).
Если макросы в других файлах, то этот способ не подходит.
Макрос
Sub макрос()
Dim var
' Запись в переменную текста.
var = "Привет друг"
' Если в переменной текст "Привет друг".
If var = "Привет друг" Then
имя_модуля1.имя_процедуры1
' Если в переменной нет текста "Привет друг".
Else
имя_модуля2.имя_процедуры2
End If
End Sub