Перейти к основному содержанию

Как удалить все HTML-теги из строки в Excel?

Если у вас есть рабочий лист, содержащий текстовые строки, окруженные тегами HTML, теперь вы хотите удалить все теги HTML из строк, чтобы сделать ячейки четкими и более удобочитаемыми, как показано на следующих снимках экрана. В этой статье я расскажу о некоторых методах решения этой задачи в Excel.

документ удалить теги HTML 1
1
документ удалить теги HTML 2

Удалите все HTML-теги из текстовой строки с помощью команды «Найти и заменить»

Удалите все HTML-теги из текстовой строки с кодом VBA


стрелка синий правый пузырь Удалите все HTML-теги из текстовой строки с помощью команды «Найти и заменить»

В самом деле, Найти и заменить функция в Excel может решить эту проблему, пожалуйста, сделайте следующее:

1. Выделите ячейки, из которых вы хотите удалить HTML-теги.

2. Держать Ctrl + H , чтобы открыть Найти и заменить диалоговое окно, в диалоговом окне, в Найти то, что текстовое поле, введите <*>, и оставьте Заменить текстовое поле пустое, см. снимок экрана:

документ удалить теги HTML 3

3. Затем нажмите Заменить все Кнопка, все теги HTML удаляются сразу.


стрелка синий правый пузырь Удалите все HTML-теги из текстовой строки с кодом VBA

Следующий код VBA может помочь вам удалить теги HTML из выделенного фрагмента. Для этого выполните следующие действия:

1. Удерживайте Alt + F11 ключи в Excel, и он открывает Microsoft Visual Basic для приложений окно.

2. Нажмите Вставить > Модулии вставьте следующий код VBA в Модули Окно.

Код VBA: удалить все HTML-теги из текстовой строки

Sub RemoveTags()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select data range", "Kutools for Excel", xAddress, , , , , 8)
    Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    xRg.NumberFormat = "@"
    With CreateObject("vbscript.regexp")
        .Pattern = "\<.*?\>"
        .Global = True
        For Each xCell In xRg
            xCell.Value = .Replace(xCell.Value, "")
        Next
    End With
End Sub

3, Затем нажмите F5 Чтобы запустить этот код, в появившемся диалоговом окне выберите ячейки, из которых вы хотите удалить теги HTML, см. снимок экрана:

документ удалить теги HTML 4

4. Затем нажмите OK, все HTML-теги были удалены из выбора сразу.

Скачать бесплатно Kutools for Excel прямо сейчас!

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

Описание


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Formatting is also removed, as it is with the Find and Replace.

Thanks for the code and tips.
This comment was minimized by the moderator on the site
Вариант с <*> просто великолепен.
Спасибо Вам
This comment was minimized by the moderator on the site
I have some text that is in bullet points, when i run this program it strips this out. how can i select which html tags to remove and which to keep?
This comment was minimized by the moderator on the site
xAddress is never used
This comment was minimized by the moderator on the site
Thank you .. The VBA instructions worked!
This comment was minimized by the moderator on the site
Thank you! I was able to clean up a large excel file with VBA with your simple instructions
This comment was minimized by the moderator on the site
Thank you for the code to remove all HTML tags from text string using VBA. I am going to pass your site along to my co-workers.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations