Профессиональные приемы работы в Microsoft Excel

Обмен опытом => Microsoft Excel => Тема начата: barbus от 19.02.2010, 22:28

Название: Как из Excel с помощью макроса открыть файл Word
Отправлено: barbus от 19.02.2010, 22:28
Задача заключается вот в чем.
Есть два файла Excel и Word в одной папке. В файле ворда есть шаблон текста с ссылка из ячеек Excel-а.Файл Excel-а открыт а ворд закрыт, в ячейках есть данные которые отражаются в документе ворд. После того как  будут изменены данные, надо с помощью кнопки из документа Excel открыть документ ворд и напечатать страницы введенные в макрос кнопки, после чего документ ворд снова закроется.

Как из Excel с помощью макроса открыть файл Word-а и задать параметры для печати.
Название: Re: Как из Excel с помощью макроса открыть файл Word
Отправлено: libertarij от 21.02.2010, 15:41
Открыть так:

Sub Открыть_документ_Word()
'
' Открыть_документ_Word Макрос
' Открыть документ Word из Excel
'
' Сочетание клавиш: Ctrl+d
'
Dim WD
    Set WD = CreateObject("Word.Application")
    WD.Visible = True
    WD.Documents.Open Filename:=Application.ThisWorkbook.Path & "\1.doc"
End Sub