Note: The other languages of the website are Google-translated. Back to English

Fjern eller fjern html-tags fra tekststrenge

Hvis der er flere tekststrenge, der er omgivet af html-tags, kan metoderne i denne artikel gøre dig en tjeneste for at fjerne alle html-tags.


Fjern eller fjern alle enkle html-tags med formlen

Hvis dine tekststrenge er omgivet af nogle enkle html-tags, kan MID-funktionen i Excel hjælpe dig med at løse dette job. Den generiske syntaks er:

=MID(string,text_start,LEN(string)-tag_len)
  • string: tekststrengen eller celleværdien, som du vil fjerne html-tags fra.
  • text_start: nummeret på den position, det første tegn, som du vil bruge.
  • tag_len: længden af ​​html-tags inden for tekststrengen.

Kopier eller indtast følgende formel i en tom celle:

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

Træk derefter fyldhåndtaget ned til cellerne, som du vil anvende denne formel, og alle html-tags er fjernet fra cellerne som vist nedenstående skærmbillede:


Forklaring til formlen:

LEN (A2) -7: Denne LEN-funktion bruges til at beregne længden af ​​tekststrengen i celle A2, og subtraherer 7 (antallet af html-tags, både start- og slutkoder) betyder at få det antal tegn, du vil udtrække, hvilket ekskluderer html-koden. Den returnerede værdi bruges som argumentet num_chars i MID-funktionen.

MID (A2,4, LEN (A2) -7): Denne MID-funktion bruges til at udtrække alle de tegn, der starter ved det fjerde tegn, og længden af ​​strengen er de num-tegn, der returneres af LEN-funktionen.


Fjern eller fjern nogle komplekse html-tags med VBA-kode

Hvis der er flere html-tags inden for tekststrengen som vist nedenstående skærmbillede, fungerer ovenstående formel muligvis ikke korrekt. I dette tilfælde kan følgende VBA-kode hjælpe dig med at håndtere nogle komplekse html-tags i tekststrenge.

1. Hold nede Alt + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende VBA-kode i modulvinduet.

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. Tryk derefter på F5 nøgle til at køre denne kode, og der vises en promptboks, skal du vælge de celler, du vil fjerne html-tags, se skærmbillede:

4. Klik derefter på OK knap, og alle html-tags er fjernet fra de valgte celler, se skærmbillede:


Relative anvendte funktioner:

  • LEN:
  • LEN-funktionen returnerer antallet af tegn i en tekststreng.
  • MID:
  • MID-funktionen bruges til at finde og returnere et specifikt antal tegn fra midten af ​​den givne tekststreng.

Flere artikler:

  • Fjern linjeskift fra celler i Excel
  • Denne vejledning indeholder tre formler, der hjælper dig med at fjerne linjeskift (som forekommer ved at trykke på Alt + Enter nøgler i en celle) fra specifikke celler i Excel.

De bedste Office-produktivitetsværktøjer

Kutools til Excel - Hjælper dig med at skille dig ud fra mængden

Kunne du tænke dig at udføre dit daglige arbejde hurtigt og perfekt? Kutools til Excel bringer 300 kraftfulde avancerede funktioner (Kombiner projektmapper, sum efter farve, delt celleindhold, konverter dato, og så videre...) og spar 80% tid for dig.

  • Designet til 1500 arbejdsscenarier, hjælper dig med at løse 80 % Excel-problemer.
  • Reducer tusindvis af tastatur- og museklik hver dag, lindre dine trætte øjne og hænder.
  • Bliv en Excel-ekspert på 3 minutter. Behøver ikke længere huske smertefulde formler og VBA-koder.
  • 30-dages ubegrænset gratis prøveperiode. 60-dages pengene tilbage garanti. Gratis opgradering og support i 2 år.
Ribbon of Excel (med Kutools til Excel installeret)

Fanen Office - Aktiver læsning og redigering af faner i Microsoft Office (inkluderer Excel)

  • Et sekund til at skifte mellem snesevis af åbne dokumenter!
  • Reducer hundreder af museklik for dig hver dag, og farvel med musens hånd.
  • Øger din produktivitet med 50 %, når du ser og redigerer flere dokumenter.
  • Bringer effektive faner til Office (inkluderer Excel), Ligesom Chrome, Firefox og ny Internet Explorer.
Skærmbillede af Excel (med Office-fanen installeret)
Sorter kommentarer efter
Kommentarer (0)
Ingen vurderinger endnu. Vær den første til at bedømme!
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL