Запустить внешний макрос Версия 1 (Net)

Группа действий: Word 


Описание

Действие запускает в Word-документе макрос, VBA-код которого указан в отдельном текстовом файле
Более подробно по работе с макросами можно посмотреть тут: 

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

Параметры и их настройки

Свойство

Описание

Тип

Пример заполнения

Обязательность заполнения поля

Параметры

Контекст

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

Word


Да

Путь к макросу

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

Путь к файлу


Да

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

Особые условия использования 

  1. В параметрах безопасности должен быть выбран чекбокс “Доверять доступ к объектной модели проектов VBA“.

  2. Если необходимо указать несколько параметров, пользователь должен указать в поле «Параметры» коллекцию, содержащую эти параметры.
  3. Значения параметров необходимо указывать в том же порядке, в каком эти параметры указаны в вызываемой функции.
  4. Русский язык не поддерживается в названии макроса (функции).

Пример использования 

Задача

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

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

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

Решение

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

Реализация

  1. Собрать робота, состоящего из следующих действий.

  2. Настроить параметры для действия «Открыть».

  3. Настроить параметры для действия «Запустить внешний макрос».

  4. Настроить параметры действия "Сохранить как".

  5. Нажать на кнопку «Старт» в верхней панели.

Результат

Робот отработал успешно.

Действие запускает в Word-файле внешний макрос, VBA-код которого указан в отдельном текстовом файле.

  • Нет меток