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
- Fjern eller fjern nogle komplekse html-tags med VBA-kode
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:
- 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:
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 uønskede tegn fra celle i Excel
- Du kan bruge SUBSTITUTE-funktionen til at fjerne uønskede tegn fra en bestemt celle i Excel.
- 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.
- Fjern tekst baseret på variabel position i Excel
- Denne vejledning forklarer, hvordan du fjerner tekst eller tegn fra en celle, når den lokaliseres i variabel position.
- Fjern eller fjern ikke-numeriske tegn fra tekststrenge
- Nogle gange skal du muligvis fjerne alle de ikke-numeriske tegn fra tekststrengene og kun beholde tallene som vist nedenfor. Denne artikel introducerer nogle formler til løsning af denne opgave i Excel.
De bedste Office-produktivitetsværktøjer
Kutools til Excel - Hjælper dig med at skille dig ud fra mængden
Kutools til Excel kan prale af over 300 funktioner, At sikre, at det, du har brug for, kun er et klik væk...
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.
- Giver effektive faner til Office (inkluderer Excel), ligesom Chrome, Edge og Firefox.