Перейти до основного матеріалу

Як перетворити декілька таблиць у текст у програмі Word?

Якщо в документі багато таблиць, і ви хочете перетворити їх на текст, як це можна зробити швидко? Цей підручник покаже вам кілька хитрих способів швидкого перетворення кількох таблиць у текст у програмі Word.

Перетворюйте таблиці в текст по черзі

Перетворіть усі таблиці в текст за допомогою VBA

Легко перетворюйте кілька таблиць у текст за допомогою Kutools

Рекомендовані засоби підвищення продуктивності для Word

Kutools для Word: Інтеграція ШІ 🤖, понад 100 розширених функцій заощаджують 50% часу обробки документів.Безкоштовне завантаження

Вкладка Office: представлено вкладки, подібні до браузера, у Word (та інших інструментах Office), що спрощує навігацію між кількома документами.Безкоштовне завантаження


стрілка синя права міхур Перетворюйте таблиці в текст по черзі

Office Word надає функцію перетворення таблиці в звичайний текст, але вона може застосовуватися лише до однієї таблиці одночасно.

Вкладка Office: надає інтерфейси вкладок у Word, Excel, PowerPoint...
слово середнє оголошення 100
Покращте свій робочий процес зараз.      Детальніше       Безкоштовне завантаження

Крок 1: виберіть або розмістіть курсор у таблиці, яку потрібно перетворити;

Крок 2: перейдіть до макет вкладка під Робота з таблицями, і клацніть Перетворити в текст in дані група;

doc-таблиці-до-тексту-1

Крок 3: виберіть стиль позначки, щоб розділити комірки таблиці;

doc-таблиці-до-тексту-2

Крок 4: клацніть OK і Word перетворить таблицю в текст;

Крок 5: повторюйте кроки 1 - 4, поки всі таблиці не будуть перетворені;


стрілка синя права міхур Перетворіть усі таблиці в текст за допомогою VBA

VBA може перетворити всі таблиці документа в текст.

Крок 1: натисніть “Alt-F11”, Щоб відкрити вікно Microsoft Visual Basic для програми;

Крок 2: клацніть Модулі на Insert вкладку, скопіюйте та вставте наступний код VBA у вікно Модуль;

Крок 3: клацніть прогін , щоб застосувати VBA.

Код VBA для перетворення всіх таблиць у текст:

ПідтаблиціToText ()
Тьмяний tbl як таблиця
Для кожного tbl в таблицях ActiveDocument.Tables
tbl.ConvertToText
Розділювач: = wdSeparateByTabs
Далі табл
Встановити tbl = Нічого
End Sub


стрілка синя права міхур Легко перетворюйте кілька таблиць у текст за допомогою Kutools

Перетворення кількох таблиць у текст по одній займає багато часу, а код VBA завжди надає єдиний спосіб розділити всі таблиці в документі. Kutools може легко перетворити всі таблиці з виділеного або цілого документа в звичайний текст. І він використовує один і той же функціональний інтерфейс із Word, щоб надати користувачам різні способи розділення комірок таблиці.

Kutools для Word, зручна надбудова, включає групи інструментів, що полегшують вашу роботу та покращують вашу здатність обробляти текстові документи. Безкоштовна пробна версія протягом 45 днів! Get It Now!

Натисніть Кутулс >> клацніть Таблиця до тексту in таблиця група

doc-таблиці-до-тексту-3

Для перетворення декількох таблиць виділеного або цілого документа, будь-ласка, спершу виберіть частину документа або цілий документ, а потім застосуйте утиліту, натиснувши Kutools >> Таблиця в текст у таблиці, і виберіть роздільник для звичайного тексту після перетворення в діалогове вікно Перетворити таблицю в текст.

Для отримання додаткової інформації, будь ласка, відвідайте: перетворити кілька таблиць у текст.


Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Kutools AI Assistant: змініть свій текст за допомогою ШІ - Створення вмісту  /  Переписати текст  /  Узагальнити документи  /  Звертайтеся за інформацією на основі Документа, все в Word

📘 Майстерність документів: Розділити сторінки  /  Об’єднати документи  /  Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...)  /  Пакетне перетворення в PDF  /  Експортувати сторінки як зображення  /  Друк кількох файлів одночасно...

Редагування змісту: Пакетний пошук та заміна між кількома файлами  /  Змінити розмір усіх зображень  /  Транспонування рядків і стовпців таблиці  /  Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори  /  Розбиття розділів  /  Усі заголовки  /  Текстові поля  /  Гіперпосилання  / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...

Творчі вставки: Вставити Роздільники тисяч  /  Прапорці  /  радіо кнопки  /  QR-код  /  Штрих-код  /  Таблиця діагональних ліній  /  Заголовок рівняння  /  Підпис зображення  /  Заголовок таблиці  /  Кілька зображень  / Дізнайтеся більше в Вставити групу...

???? Точність вибору: Точне визначення конкретні сторінки  /  Таблиці  /  форми  /  заголовок абзаців  / Покращте навігацію за допомогою більше Виберіть функції...

Покращення зірок: Швидка навігація до будь-якого місця  /  автоматичне вставлення повторюваного тексту  /  плавно перемикатися між вікнами документів  /  11 Інструменти перетворення...

👉 Хочете спробувати ці функції? Kutools для Word пропонує a 60-денна безкоштовна пробна версія, без обмежень! ????
 
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
After running the VBA code, MS Word has changed. I no longer have access to VBA tools, and the font is larger. I don't know what else has changed yet. What do I do now?
This comment was minimized by the moderator on the site
Thank you for this! it is appreciated!
This comment was minimized by the moderator on the site
The correct code as follows: Sub TablesToText() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.ConvertToText Separator = wdSeparateByTabs Next tbl Set tbl = Nothing End Sub
This comment was minimized by the moderator on the site
thank you, now it works
This comment was minimized by the moderator on the site
please kindly let me know "what is the code for change only selected tables to text in word?"
This comment was minimized by the moderator on the site
Thank you. It worked.
This comment was minimized by the moderator on the site
Thank you. It works!!
This comment was minimized by the moderator on the site
Here's a code that works: Sub AllTablestoText() ' ' AllTablestoText Macro ' Macro created by Jarosław Michalak ' For Each aTable In ActiveDocument.Tables aTable.ConvertToText wdSeparateByCommas, True Next aTable End Sub Source: http://howto.wikispaces.umb.edu/Convert+all+tables+to+text
This comment was minimized by the moderator on the site
The VBA code isn't working.. when I press F5 for execution, it says "Compile error; syntax error;"
This comment was minimized by the moderator on the site
I think lines 4 and 5 of the VBA code above should be combined: tbl.ConvertToText Separator:=wdSeparateByTabs
This comment was minimized by the moderator on the site
Thank you SImon! It works.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations