Как вставить текст из Excel в Word: пошаговая инструкция

Предложу два варианта переноса данных из Excel в Word.

Cоздаются связи между книгой Excel и Шаблоном Word. После заполнения связанных ячеек в Excel и вызова/обновления Шаблона Word мы получаем заполненную данными из Excel копию Шаблона Word.

1.Открываем Шаблон Word и файл с данными Excel. Затем выделяем в Excel нужную ячейку и выбираем в Word место для вставки, затем на вкладке «Главная» -> «Вставить» -> «Специальная вставка..»

re>

В появившейся форме слева выбираем «Связать:» и в поле «Как:» -> Неформатированный текст. Жмем ОК. Связь установлена. Сохраним и закроем Шаблон Word.

re>

2.Создадим макрос, который теперь будет вызывать/обновлять связанный шаблон. Где FileSt — это имя и место расположения файла Шаблона Word, а FileNew — это имя и место расположения нового файла Word.

re>Sub obj() Dim objWord As Object Dim FileStart Dim FileNew Set objWord = CreateObject("Word.Application") FileSt = "C:Шаблон.docx" FileNew = "C:Новый_Файл.docx" objWord.Documents.Open FileSt For Each MyLink In objWord.ActiveDocument.Fields MyLink.Update MyLink.Unlink Next MyLink objWord.ActiveDocument.SaveAs _ filename:=FileNew, _ FileFormat:=wdFormatDocument, _ Password:="", _ AddToRecentFiles:=True, _ WritePassword:="", _ ReadOnlyRecommended:=False objWord.Quit End Sub

Cоздаём закладки в Шаблоне Word.

1.Открываем Шаблон Word. Установим курсор в нужном месте, на вкладке «Вставка» -> выбираем «Закладка» и в появившейся форме вводим имя закладки (например: first) -> нажимаем «Добавить». Сохраним и закроем Шаблон Word.

re>

2.Создадим макрос, который теперь будет вызывать Шаблон с закладками и вносить данные из ячейки Cells(1,1).Value в созданную закладку first Шаблона Word.

re>Sub obj() Dim objWord As Object Dim FileStart Dim FileNew Set objWord = CreateObject("Word.Application") FileSt = "C:Шаблон.docx" FileNew = "C:Новый_Файл.docx" Set objDoc = objWord.Documents.Open(FileSt) objWord.Visible = True objDoc.Bookmarks("first").Range.InsertAfter (Cells(1, 1).Value) objWord.ActiveDocument.SaveAs _ Filename:=FileNew, _ FileFormat:=wdFormatDocument, _ Password:="", _ AddToRecentFiles:=True, _ WritePassword:="", _ ReadOnlyRecommended:=False objWord.Quit End Sub

P.S. Обращаю внимание, что если вместо objWord.Visible = True написать objWord.Visible = False, то Шаблон Word появляться не будет.

Excel works!

menu

Неудивительно, что очень часто приходится использовать Excel, как расчетный инструмент — создавать таблицы и графики, делать сложную математику из нескольких таблиц. Однако, отчеты о работе или решаемых задачах, в большинстве случаев, оформляются именно в Word. Как вставить из Excel в Word просто? Как перенести данные со связью? Как сделать все красиво?

Просто копировать из Excel в Word. Как вставить из Excel в Word?

Тут все просто: выделяем нужную таблицу в Excel. Нажимаем «копировать» (ctrl+c), открываем нужный документ Word, нажимаем вставить (ctrl+c). Получается примерно так:

Чтобы выровнять границы в таблице Word, кликните два раза на границе левой кнопкой мыши (предварительно выбрав всю таблицу), как показано на гифке.

Перенос из Excel в Word и связь Excel и Word

Думаю, пункта выше нам мало. Хотелось бы, чтобы еще сохранялась и связь между двумя документами. Т.е. если вы изменяете данные в таблице Excel, то менялись бы данные и в Word. На самом деле, это делается быстро.

Опять же выделяем и копируем таблицу в редакторе. Переходим в документ Word. Тут поподробнее. В меню Главная найдите раздел Буфер обмена и кнопку вставить. Выберите Специальная вставка

prosto-kopirovat-iz-excel-v-word-2

Откроется окно, как на начальной картинке. Выберите пункт Связать слева и в окне Как нажмите «Лист Microsoft Office Excel (объект)»

Теперь если вы меняете данные в файле Excel, вы можете обновить данные в Word — они изменятся

prosto-kopirovat-iz-excel-v-word-3

Удобно. Для любого продукта MS Office можно применять эту возможность. Мне часто помогает с PowerPoint. Советую.

Конвертировать из Excel в Word

Может так же понадобится сконвертировать любую таблицу в текстовые данные.

Выберите таблицу в Word. Перейдите на появившуюся вкладку Макет — Преобразовать в текст

prosto-kopirovat-iz-excel-v-word-5

Далее выбираем знак табуляции (или тот символ, который нужен)

Теперь это будет не таблица, а список.

Кстати, вы можете хранить целые файлы Excel прямо в документе Word или PowerPoint, как это сделать — здесь . Удобно, если нужно сохранить несколько доков!

Похожие статьи

  • 25.04.2015Инструмент найти и заменить в Excel и WordPosted in Поиск, Word
  • 20.08.2017Новая форма Р14001 в Excel и WordPosted in Печатные формы, Word
  • 12.03.2018Как удалить пустой лист в Word?Posted in Word
  • 07.05.2018Как сделать титульный лист в Word?Posted in Word
  • 13.04.2018Как сделать альбомный лист в Word?Posted in Word
  • 15.02.2019Как быстро поставить ударение в Word или Excel?Posted in Работа с текстом, Word
  • 24.10.2016Запись значений формул и редактор формул WordPosted in Оформление, Word
  • 05.04.2017Масштаб в Excel и Word. Как быстро увеличить значки в Windows?Posted in Оформление, Word
Оцените статью
InternetDoc.ru
Добавить комментарий