Hoppa till huvudinnehåll

Ta bort eller ta bort html-taggar från textsträngar

Om det finns flera textsträngar som omges av html-taggarna kan metoderna i den här artikeln göra dig en tjänst för att ta bort alla html-taggarna.


Ta bort eller ta bort alla enkla html-taggar med formeln

Om dina textsträngar omges av några enkla html-taggar kan MID-funktionen i Excel hjälpa dig att lösa detta jobb. Den generiska syntaxen är:

=MID(string,text_start,LEN(string)-tag_len)
  • string: textsträngen eller cellvärdet som du vill ta bort html-taggarna från.
  • text_start: numret på den position som det första tecknet som du vill använda.
  • tag_len: längden på html-taggarna i textsträngen.

Vänligen kopiera eller skriv in följande formel i en tom cell:

=MID(A2,4,LEN(A2)-7)

Dra sedan påfyllningshanteringen ner till cellerna som du vill använda den här formeln, och alla html-taggar har tagits bort från cellerna enligt nedanstående skärmdump:


Förklaring av formeln:

LENN (A2) -7: Denna LEN-funktion används för att beräkna längden på textsträngen i cell A2 och subtraherar 7 (antalet html-taggar, både början och sluttaggen) betyder att få antalet tecken som du vill extrahera som exkluderar html-taggen. Det returnerade värdet kommer att användas som argumentet num_chars inom MID-funktionen.

MID (A2,4, LEN (A2) -7): Denna MID-funktion används för att extrahera alla tecken som börjar vid det fjärde tecknet, och strängens längd är de siffror som returneras av LEN-funktionen.


Ta bort eller ta bort några komplexa HTML-taggar med VBA-kod

Om det finns flera html-taggar i textsträngen som nedan visas skärmdump, kanske ovanstående formel inte fungerar korrekt, i det här fallet kan följande VBA-kod hjälpa dig att hantera några komplexa html-taggar i textsträngar.

1. Håll ner Alt + F11 nycklar i Excel, och det öppnar Microsoft Visual Basic för applikationer fönster.

2. Klicka Insert > Modulernaoch klistra in följande VBA-kod i modulfönstret.

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. Tryck sedan på F5 nyckel för att köra den här koden och en snabbruta dyker upp, välj de celler som du vill ta bort html-taggarna, se skärmdump:

4. Och klicka sedan på OK och alla html-taggar har tagits bort från de valda cellerna, se skärmdump:


Relativa funktioner som används:

  • LEN:
  • LEN-funktionen returnerar antalet tecken i en textsträng.
  • MID:
  • MID-funktionen används för att hitta och returnera ett visst antal tecken från mitten av den angivna textsträngen.

Fler artiklar:

  • Ta bort radbrytningar från celler i Excel
  • Denna handledning innehåller tre formler som hjälper dig att ta bort radbrytningar (som inträffar genom att trycka på Alt + Enter-tangenterna i en cell) från specifika celler i Excel.

De bästa Office-produktivitetsverktygen

Kutools för Excel - Hjälper dig att sticka ut från mängden

Populära funktioner: Hitta, markera eller identifiera dubbletter  |  Ta bort tomma rader  |  Kombinera kolumner eller celler utan att förlora data  |  Rund utan formel ...
Super VLookup: Flera kriterier  |  Multipelt värde  |  Över flera ark  |  Fuzzy Lookup...
Adv. Rullgardinslista: Enkel rullgardinslista  |  Beroende rullgardinslista  |  Flervals-rullgardinslista...
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  Jämför kolumner med Välj Samma och olika celler ...
Utvalda funktioner: Rutnätsfokus  |  Designvy  |  Stor formelbar  |  Arbetsbok & Bladhanterare | Resursbibliotek (Automatisk text)  |  Datumväljare  |  Kombinera arbetsblad  |  Kryptera/Dekryptera celler  |  Skicka e-postmeddelanden efter lista  |  Superfilter  |  Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken ...)  |  50 + Diagram Typer (Gantt Chart ...)  |  40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag ...)  |  19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg ...)  |  12 Konvertering verktyg (Siffror till ord, Valutaväxling ...)  |  7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela upp Excel-celler ...)  |  ... och mer

Kutools för Excel har över 300 funktioner, Se till att det du behöver bara är ett klick bort...


Fliken Office - Aktivera läsning och redigering av flikar i Microsoft Office (inkluderar Excel)

  • En sekund att växla mellan dussintals öppna dokument!
  • Minska hundratals musklick åt dig varje dag, säg adjö till mushanden.
  • Ökar din produktivitet med 50 % när du visar och redigerar flera dokument.
  • Ger effektiva flikar till Office (inklusive Excel), precis som Chrome, Edge och Firefox.
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations