Копирование таблицы Word в Excel
Если вы хотите переместить данные из таблицы Word в Excel, можно избежать повторного ввода, скопировав их прямо из Word. При копировании из таблицы Word на лист Excel данные в каждой ячейке таблицы Word вставляются в отдельную ячейку на листе.
Важно: После вставки данных может потребоваться очистить их, чтобы воспользоваться функциями вычислений Excel. Например, в ячейках могут быть ненужные пробелы, числа могут быть вставлены как текст, а не как числовые значения, с которыми можно выполнять вычисления, а даты могут отображаться неправильно. Сведения о форматировании чисел как дат, денежных единиц, процентов и т. д. см. в статье Форматирование чисел. Справку о форматировании таблицы можно найти в статье Форматирование таблицы Excel.
- Выберите в документе Word строки и столбцы таблицы, которые вы хотите скопировать на лист Excel. Убедитесь, что в ячейках таблицы нет дополнительных возвращаемых каретки. В противном случае это может привести к лишним строкам в Excel.
- Чтобы скопировать выделенный фрагмент, нажмите клавиши CTRL+C.
- На листе Excel выделите левый верхний угол области, в которую нужно вставить таблицу Word.
Примечание: Перед вставкой убедитесь, что область пуста. Данные из ячеек таблицы Word заменят все существующие данные в ячейках листа, находящихся в области вставки. При необходимости перед копированием просмотрите таблицу в Word для проверки ее размеров.
- Чтобы использовать форматирование, примененное к ячейкам листа, выберите вариант Использовать форматы конечных ячеек.
- Чтобы использовать форматирование таблицы Word, выберите вариант Сохранить исходное форматирование.
Примечание: Excel вставит содержимое каждой ячейки таблицы Word в отдельную ячейку. После вставки данных их можно распространить на другие ячейки в столбце (например, разделив имя и фамилию, чтобы они отображались в отдельных ячейках) с помощью команды Текст по столбцам. Дополнительные сведения см. в статье Распределение содержимого ячейки на соседние столбцы.
Как вставить символы в нужное место во все ячейки Excel
Задача довольна частая при работе в Excel — допустим у нас есть список:

Нам нужно преобразовать каждую запись в ячейках добавив к ним префиксом слово «Сотрудник — «.
Чтобы было «Сотрудник — Петров» и так далее по списку.
Чтобы вставить символы во все ячейки Excel есть несколько вариантов:
1. Добавим в символы в ячейки с помощью формул
Можно использовать формулу =СЦЕПИТЬ.
Для вставки слова «Сотрудник -» в каждую ячейку нужно в рядом стоящую ячейку В1 записать формулу, как показано ниже и нажать клавишу Enter на клавиатуре.
Далее перетаскивающем маркера автозаполнения протягиваем формулу вниз, до нужной строки. Так можно вставить символы и слова вначале или в конце записи ячейки.

Используя формулу с амперсандом «&»
Сначала нужно в одну свободную ячейку вписать то, что нужно добавить к списку «Сотрудник — «

Затем записываем формулу, где первой указываем то, что должно стоять в начале затем амперсанд, потом указываем ячейку, содержащую основную ячейку. Наживаем клавишу Enter и протягиваем до нужной строки.
2. Добавить символы во все ячейки с помощью надстройки
Как из ворда вставить в эксель в каждую ячейку
нужно в каждую ячейку в столбце вставить одно и тоже слово например перед тем значением которое там уже есть
как это сделать быстро когда ячеек в столбце много
Пользователь
Сообщений: 8839 Регистрация: 11.01.2013
26.03.2014 10:58:35
Выделить диапазон, Alt+F11, Ctrl+G, ввести команду ниже, Enter.
selection.value=evaluate("""например ""&" & selection.address)
Пользователь
Сообщений: 2063 Регистрация: 01.01.1970
26.03.2014 12:19:27
можно просто формулой)
для B1
="нужное слово "&A1
B1 скопировать и вставить в А1 как значение
Изменено: Dima S — 26.03.2014 12:19:48
Пользователь
Сообщений: 148 Регистрация: 21.12.2013
26.03.2014 12:56:38
если слово одно и то же для всех ячеек, то $A$1
вместо копи-паст как значение можно преобразовать колонку В:В в значение (например, с помощь функционала надстройки Плекс, будет быстрее ИМХО)
Изменено: googlogmob — 26.03.2014 20:23:39
Пользователь
Сообщений: 11833 Регистрация: 17.01.2014
ПОЛ: МУЖСКОЙ | Win10x64, MSO2019x64
26.03.2014 12:59:16
| Цитата |
|---|
| googlogmob пишет: если слово одно и то же для всех ячеек, то $A$1 |
Ошибаетесь. Если протянуть предложенное вами, то во всех ячейках будет:
="нужное слово "&$A$1
Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
Пользователь
Сообщений: 148 Регистрация: 21.12.2013
26.03.2014 13:02:24
зафиксировать ячейку с значением и через сцепить применить к колонкам
Извиняюсь, не вник в суть А1 именно этой формулы. Тогда да
Пользователь
Сообщений: 8 Регистрация: 26.11.2017
02.12.2017 13:07:53
Добрый день всем.
Большая таблица, вставлены в ячейке дата рождения, нужно добавить к каждой «г.р.»
С помощью формулы =C2&»г.р.» — получается вот такие результаты
Где ошибка? Книга1.xlsx (9.18 КБ)
Пользователь
Сообщений: 8839 Регистрация: 11.01.2013
02.12.2017 13:15:06
=ТЕКСТ(C3;"ДД.ММ.ГГГГ \г.р.")
Изменено: Казанский — 02.12.2017 13:17:24
Страницы: 1
Читают тему
© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru
Использование любых материалов сайта допускается строго с указанием прямой ссылки на источник, упоминанием названия сайта, имени автора и неизменности исходного текста и иллюстраций.
| ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949 |
ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071 |
2 способа скопировать текст из Word в Excel с каждым словом в отдельной ячейке

Если вы лингвист, вам, вероятно, нужно часто подсчитывать частоту слов. Тогда наша тема сегодня будет большим подспорьем. Два приведенных ниже метода позволят вам вставлять тексты из документа на лист Excel и перечислять каждое слово в ячейке столбца.
Способ 1: используйте опцию «Найти и заменить»
- Для начала сделайте копию tarполучить документ. Это чрезвычайно важно, и мы будем проводить все операции в файле копирования, чтобы предотвратить потерю данных.
- Во-вторых, выбрать все tarполучать тексты и применять их в стиле «Обычный». Для этого нажмите «Alt+Ctrl+Shift+S», чтобы открыть окно «Стили». Затем найдите и нажмите «Обычный» стиль.
- В-третьих, нажмите «Ctrl + H», чтобы вызвать окно «Найти и заменить».
- Поместите курсор в текстовое поле «Найти что» и введите пробел.
- Затем поместите курсор в текстовое поле «Заменить на» и введите «^p».
- Затем нажмите «Заменить все».

- Нажмите «Нет» в следующем всплывающем окне.

- Теперь вы можете видеть, что каждое слово находится в одной строке. Но есть и пустая строка:

Поэтому, чтобы удалить его, вам нужно снова вызвать окно «Найти и заменить».
- На этот раз введите «^p^p» в текстовом поле «Найти что» и «^p» в поле «Заменить на».
- Щелкните «Заменить все».

- Теперь нажмите «Ctrl + C», чтобы скопировать список слов.
- Откройте Excel и нажмите «Ctrl + V», чтобы вставить список.

Способ 2: используйте коды VBA для снижения нагрузки

- Точно так же сначала сделайте копию и выберите все tarполучить тексты.
- Затем нажмите «Alt + F11», чтобы открыть редактор VBA.
- Затем нажмите «Обычный» и «Вставить» по порядку.
- И выберите «Модуль», чтобы создать новый.
- Дважды щелкните модуль, чтобы открыть его, и вставьте следующие коды:
Sub CopySelectParagraphWordByWordToExcel() If Selection.Range <> "" Then Selection.Style = ActiveDocument.Styles("Normal") Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = " " .Replacement.Text = "^p" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False Завершить Selection.Find.Execute Заменить: =wdReplaceAll Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = "^p^p" .Replacement.Text = "^p" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchByte = True .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False End With Selection.Find.Execute Replace:=wdReplaceAll Selection.Copy MsgBox («Теперь вы можете просто открыть рабочий лист Excel, чтобы вставить text") Else MsgBox ("Нет выделенного текста") End If End Sub
- Затем нажмите кнопку «Выполнить».

- Далее появится окно сообщения, указывающее, что вам нужно делать дальше.

- Откройте Excel и нажмите «Ctrl + V», чтобы вставить туда тексты. Эффект такой же, как и в способе 1.
Работа с ошибками в документе Word
Вы когда-нибудь становились жертвой Коррупция слова? Если да, то вы поймете, до какого отчаяния можно дойти. Поэтому становится как никогда важно получить квалифицированный инструмент для восстановления поврежденного документа.