Копирование таблицы или текста таблицы из другой программы в Publisher
Примечание: В Publisher 128 строк и 128 столбцов в таблице. Если попытаться импортировать или скопировать таблицу в Publisher, для которых превышено это ограничение, Publisher запретит ее импорт или копирование. Сократите количество строк и столбцов в данных, прежде чем пытаться импортировать или скопировать таблицу в Publisher.
Копирование текста таблицы из любой программы на базе Microsoft Windows
- Откройте программу с нужным текстом. Если текст еще не в таблице, нажмите tab между каждой строкой и ввод в конце каждой строки.
- Вы выберите текст и нажмите CTRL+C, чтобы скопировать его.
- В Publisher нажмите кнопку «>таблицу >вставить таблицу».
- В публикации щелкните в том месте, где вы хотите в нее вть таблицу. Появится диалоговое окно «Создание таблицы».
- Введите нужное количество строк и столбцов и нажмите кнопку «ОК».
- Щелкните в том месте таблицы, где нужно вкопировать левую верхнюю ячейку скопированного текста.
- Выберите «Главная>«Специальная>».
- В списке «Как» выберите ячейкитаблицы без форматирования и нажмите кнопку «ОК».
Преобразование текста в таблицу или таблицы в текст

Показать и скрыть абзац на вкладке Главная . Это позволяет увидеть, как текст разделяется в документе.

Преобразование текста в таблицу
- Чтобы отметить границы столбцов, в которых вы хотите расположить текст, вставьте знаки разделения, например запятые или знаки табуляции.
Примечание: Если в тексте есть запятые, в качестве разделителей используйте знаки табуляции.

Обозначьте границы строк будущей таблицы с помощью знаков абзаца. В следующем примере с помощью знаков табуляции и абзаца текст разбивается на таблицу с 3 столбцами и 2 строками.

Выделите текст, который вы хотите преобразовать, а затем щелкните Вставка >Таблица >Преобразовать в таблицу.

В окне Текст в таблицу задайте параметры.
В разделе Размер таблицы убедитесь в том, что указанные числа соответствуют требуемому количеству столбцов и строк. В разделе Автоподбор ширины столбцов выберите вид таблицы. Word автоматически подбирает ширину столбцов таблицы. Если вам нужны столбцы другой ширины, выполните одно из перечисленных ниже действий.
| Действие | Параметр |
| Задать ширину всех столбцов | В поле Фиксированная ширина столбца введите или выберите необходимое значение. |
| Изменить размер столбцов в соответствии с шириной текста в каждом столбце | Автоподбор по содержимому |
| Автоматически менять размер таблицы при изменении ширины доступного пространства (например, режим веб-документа или альбомная ориентация) | Автоподбор по ширине окна |

В разделе Разделитель текста выберите использованный в тексте знак разделителя.
Нажмите кнопку ОК. Преобразованный в таблицу текст должен выглядеть подобным образом:
Преобразование таблицы в текст

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

Преобразуйте таблицы в обычный текст. Не нужно копировать, вырезать или перепечатывать. Все делается в три клика мыши при помощи всего одной команды Преобразовать в текст.
У вас есть таблица и вам необходимо её преобразовать в обычные строки.
| Когда курсор находится внутри таблицы, то наверху в ленте появляются набор контекстных вкладок РАБОТА С ТАБЛИЦАМИ. |
| На вкладке МАКЕТ вы найдете группу команд Данные, которая содержит команду Преобразовать в текст. |
| Откроется диалоговое окно Преобразование в текст. Разделитель означает, какой знак будет находится между содержимыми в ячейках значениями. |
| Знак абзаца означает, что строчки будут находиться друг под другом (если у вас несколько столбцов, то строчки по столбцам будут находиться друг под другом). |
| Знак табуляции означает, что все столбцы разделяются знаком табуляции, а строки будут находиться друг под другом. |
| Точка с запятой – так же, как и предыдущий пример, только вместо знака табуляции будет точка с запятой. |
| Другой – так же, как и два предыдущих примера, только с тем знаком (вместо табуляции или точки с запятой), который выберите сами. |
Как извлечь текст из таблицы в ворде
Сообщений: 7 Регистрация: 14.11.2019
14.11.2019 10:46:14
Здравствуйте! Существует таблица Word, в которой каждая новая строка не является новой ячейкой, а просто перенос строки (Enter-ом создавали новую строку).
Я пытаюсь извлечь все строки таблицы в ячейки Excel. Но поскольку этой не обычный перебор строк таблицы циклом, необходима помощь в создании макроса, который сможет выделить текст до переноса строки, записать его в ячейку Excel и т.д. в цикле каждую новую строку. Такое вообще реально сделать?
Вот код для подключения к документу Word:
Sub OpenWord() Dim objWrdApp As Object, objWrdDoc As Object, avFiles, i As Integer, tbl As Object avFiles = Application.GetOpenFilename _ ("Word files(*.doc*),*.do*", 1, "Выберите таблицу", , False) If VarType(avFiles) = vbBoolean Then Exit Sub End If Set objWrdApp = CreateObject("Word.Application") objWrdApp.Visible = False Set objWrdDoc = objWrdApp.Documents.Open(avFiles) Set tbl = objWrdDoc.Tables(1) ActiveSheet.Cells(1, 1) = tbl.Cell(2, 1).Range.text objWrdDoc.Close True objWrdApp.Quit Set objWrdDoc = Nothing: Set objWrdApp = Nothing End Sub
Прикрепленные файлы
- Пример.docx (12.83 КБ)
Изменено: Samyrro054 — 14.11.2019 10:51:06