Вывод вариантов Word шаблона макросом.

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Вывод вариантов Word шаблона макросом. - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: _Boroda_, китин

Вывод вариантов Word шаблона макросом. (Макросы/Sub)

Вывод вариантов Word шаблона макросом.

Donald

Дата: Пятница, 30.03.2018, 10:11 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 20

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

У меня документ Word тянет значения в шаблон с Excel мастером слияния. Нужен макрос который при открытии документа Word выберет пункт
РАССЫЛКИ
-НАЙТИ И ОБЬЕДЕНИТЬ
--ИЗМЕНИТЬ ОТДЕЛЬНЫЕ ДОКУМЕНТЫ
---ВСЕ
Это выведет все возможные варианты шаблона в новый документ.
Я использовал запись макроса
[vba]

Код

Private Sub Document_Open()
    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = wdDefaultFirstRecord
            .LastRecord = wdDefaultLastRecord
        End With
        .Execute Pause:=False
    End With
End Sub

[/vba]
но он не работает.
Спасибо