История страницы

...

Иконка действия

Параметры

...

Входные параметры

Контекст Экземпляр Word-документа, в котором будет запущен внешний макрос

Путь к макросу Путь к текстовому файлу макроса, который содержит VBA-код

Имя процедуры Имя вызываемой функции или подпрограммы, которая указана в VBA-коде макроса

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

Выходные параметры

Результат Значение, возвращаемое запущенным макросом. Если указанный макрос ничего не возвращает, результат работы действия будет пустым

...

и их настройки

Свойство	Описание	Тип	Пример заполнения	Обязательность заполнения поля
Параметры
Контекст	Экземпляр Word-документа, в котором будет запущен внешний макрос	Word		Да
Путь к макросу	Путь к текстовому файлу макроса, который содержит VBA-код	Путь к файлу		Да
Имя процедуры	Имя вызываемой функции или подпрограммы, которая указана в VBA-коде макроса	Строка		Да
Входной параметр	Значения входных параметров вызываемой функции или подпрограммы в коде макроса. Значения параметров необходимо указывать в том же порядке, в каком эти параметры указаны в вызываемой функции	Коллекция		Нет
Результаты
Результат	Значение, возвращаемое запущенным макросом. Если указанный макрос ничего не возвращает, результат работы действия будет пустым	Коллекция

...

Задача

Есть Word - документ:.

Нужно запустить в этом документе внешний макрос ReplaceEwithYo.bas:.

Блок кода

language	vb
title	ReplaceEwithYo

Sub ReplaceEwithYo()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "Е"
        .Replacement.Text = "Ё"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

...

Для реализации действия нужны следующие действия: «Открыть», «Запустить внешний макрос», «Сохранить как».