Jak usunąć wszystkie tagi HTML z ciągu znaków w programie Excel?

Jeśli masz arkusz roboczy zawierający ciągi tekstowe otoczone znacznikami HTML, teraz chcesz usunąć wszystkie znaczniki HTML z ciągów, aby komórki były wyraźne i bardziej czytelne, jak pokazano na poniższych zrzutach ekranu. W tym artykule przedstawię kilka metod radzenia sobie z tym zadaniem w programie Excel.

Usuń wszystkie znaczniki HTML z ciągu tekstowego za pomocą polecenia Znajdź i zamień

Usuń wszystkie tagi HTML z ciągu tekstowego za pomocą kodu VBA

Usuń wszystkie znaczniki HTML z ciągu tekstowego za pomocą polecenia Znajdź i zamień

W rzeczywistości Znajdowanie i zamienianie funkcja w programie Excel może rozwiązać ten problem, wykonaj następujące czynności:

1. Wybierz komórki, z których chcesz usunąć znaczniki HTML.

2. Trzymać Ctrl + H klawisze, aby otworzyć Znajdowanie i zamienianie okno dialogowe, w oknie dialogowym, w Znajdź co pole tekstowe, wpisz <*>i zostaw Zastąp pole tekstowe puste, zobacz zrzut ekranu:

doc usuń tagi html 3

3. Następnie kliknij Zamień wszystko przycisk, wszystkie znaczniki HTML są usuwane jednocześnie.

Usuń wszystkie tagi HTML z ciągu tekstowego za pomocą kodu VBA

Poniższy kod VBA może pomóc w usunięciu tagów HTML z zaznaczenia, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klucze w programie Excel i otwiera plik Microsoft Visual Basic for Applications okno.

2, Kliknij wstawka > Modułi wklej następujący kod VBA w Moduł Okno.

Kod VBA: usuń wszystkie tagi HTML z ciągu tekstowego

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. Następnie naciśnij F5 Aby uruchomić ten kod, w wyskakującym oknie dialogowym wybierz komórki, z których chcesz usunąć tagi HTML, zobacz zrzut ekranu:

doc usuń tagi html 4

4. A następnie kliknij OK, wszystkie znaczniki HTML zostały jednocześnie usunięte z zaznaczenia.

Bezpłatne pobieranie Kutools dla programu Excel teraz!

Najlepsze narzędzia biurowe

Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%

Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2021 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowa bezpłatna wersja próbna. 60-dniowa gwarancja zwrotu pieniędzy.

Czytaj więcej... Darmowe pobieranie... Zakup...

Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!