Удалите теги HTML из текстовых строк или удалите их

Если есть несколько текстовых строк, окруженных тегами html, для удаления всех тегов html методы, описанные в этой статье, могут оказать вам услугу.

• Удалите или удалите все простые теги HTML с помощью формулы
• Удалите или удалите некоторые сложные html-теги с помощью кода VBA

Удалите или удалите все простые теги HTML с помощью формулы

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

• string: текстовая строка или значение ячейки, из которых вы хотите удалить теги html.
• text_start: номер позиции, в которой находится первый символ, который вы хотите использовать.
• tag_len: длина тегов HTML в текстовой строке.

Скопируйте или введите следующую формулу в пустую ячейку:

Затем перетащите дескриптор заполнения вниз к ячейкам, к которым вы хотите применить эту формулу, и все теги html были удалены из ячеек, как показано ниже:

Пояснение к формуле:

LEN (A2) -7: Эта функция LEN используется для вычисления длины текстовой строки в ячейке A2, и вычитание 7 (количество тегов html, как начальных, так и конечных тегов) означает получение количества символов, которые вы хотите извлечь, исключая тег html. Возвращенное значение будет использоваться в качестве аргумента num_chars в функции MID.

MID (A2,4, LEN (A2) -7): Эта функция MID используется для извлечения всех символов, которые начинаются с четвертого символа, а длина строки представляет собой число символов, возвращаемых функцией LEN.

Удалите или удалите некоторые сложные html-теги с помощью кода VBA

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

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

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

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, см. снимок экрана:

4. А затем нажмите OK , и все теги html были удалены из выбранных ячеек, см. снимок экрана:

Используемые относительные функции:

Другие статьи:

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

Kutools for Excel - поможет вам выделиться из толпы

Хотите быстро и безупречно выполнять свою повседневную работу? Kutools for Excel предлагает мощные расширенные функции 300 (объединение книг, сумма по цвету, разделение содержимого ячеек, дата преобразования и т. Д.) И экономия 80% времени для вас.

• Рассчитан на 1500 сценариев работы, помогает решить 80% задач Excel.
• Уменьшите количество нажатий на клавиатуру и мышь каждый день, избавьтесь от усталости глаз и рук.
• Станьте экспертом по Excel за 3 минуты. Больше не нужно запоминать какие-либо болезненные формулы и коды VBA.
• 30-дневная неограниченная бесплатная пробная версия. 60-дневная гарантия возврата денег. Бесплатное обновление и поддержка 2 года.

Узнать больше Скачать

---

Вкладка Office - включение чтения и редактирования с вкладками в Microsoft Office (включая Excel)

• Одна секунда для переключения между десятками открытых документов!
• Уменьшите количество щелчков мышью на сотни каждый день, попрощайтесь с рукой мыши.
• Повышает вашу продуктивность на 50% при просмотре и редактировании нескольких документов.
• Добавляет эффективные вкладки в Office (включая Excel), точно так же, как Chrome, Firefox и новый Internet Explorer.

Узнать больше Скачать