Hoppa till huvudinnehåll

Hur konverterar man html till text i celler i Excel?

Som nedanstående skärmdump visas, om antalet html-taggar som finns i dina kalkylbladsceller, hur kan du konvertera dem till vanlig text i Excel? Den här artikeln visar två metoder för att ta bort alla html-taggar från celler i Excel.

Konvertera html till text i markerade celler med funktionen Sök och ersätt
Konvertera html till text i hela kalkylbladet med VBA


Konvertera html till text i celler med funktionen Sök och ersätt

Du kan konvertera alla html till texter i celler med Sök och ersätt funktion i Excel. Gör så här.

1. Markera cellerna som du vill konvertera all html till texter och tryck på ctrl + F nycklar för att öppna Sök och ersätt dialog ruta.

2. I Sök och ersätt dialogrutan, gå till ersätta fliken, ange <*> i Hitta det låda, behåll Ersätt med rutan tom och klicka på Ersätt alla knapp. Se skärmdump:

3. Sedan a Microsoft Excel dialogrutan dyker upp för att berätta hur många html-taggar som har bytts ut, klicka på OK och stäng knappen Sök och ersätt dialog ruta.

Då kan du se alla html-taggar tas bort från valda celler som visas nedan.


Konvertera html till text i hela kalkylbladet med VBA

Dessutom kan du konvertera all html till text i hela kalkylbladet samtidigt med nedanstående VBA-kod.

1. Öppna kalkylbladet innehåller html som du konverterar till text och tryck sedan på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna, kopiera sedan VBA-koden nedan till modulfönstret.

VBA-kod: Konvertera html till text i hela kalkylbladet

Sub RemoveHTMLTags()
'Update by Extendoffice 20180703
    Dim xRg As Range
    Dim xCell As Range
    Dim xStr As String
    Dim xRegEx As RegExp
    Dim xMatch As Match
    Dim xMatches As MatchCollection
    Set xRegEx = New RegExp
    Application.EnableEvents = False
    Set xRg = Cells.SpecialCells(xlCellTypeConstants)
    With xRegEx
        .Global = True
        .Pattern = "<(""[^""]*""|'[^']*'|[^'"">])*>"
    End With
    For Each xCell In xRg
        xStr = xCell.Value
            Set xMatches = xRegEx.Execute(xCell.Text)
            For Each xMatch In xMatches
                xStr = Replace(xStr, xMatch.Value, "")
            Next
        xCell.Value = xStr
    Next
   Application.EnableEvents = True
End Sub

3. Fortfarande i Microsoft Visual Basic för applikationer klicka på fönstret verktyg > Referensprojekt, kolla Microsoft VBScript Regular Expression 5.5 alternativet i Referenser-VBAProject dialogrutan och klicka sedan på OK knapp.

4. tryck på F5 eller klicka på Kör för att köra koden.

Sedan tas alla html-taggar bort från hela kalkylbladet omedelbart.


Relaterade artiklar:

Bästa kontorsproduktivitetsverktyg

Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en 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 intervall och kolumner ...
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 celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

kte-flik 201905


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (5)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Can we prevent the links present in the html to stop converting?
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi Yash,
I don't quite understand what your mean. Can you upload a screenshot of your data?
This comment was minimized by the moderator on the site
I believe Yash likely means he would like to retain the "src" & "href" attributes. I would suggest extracting those using formulas in adjacent columns, editing the formula values into text and then proceeding with the html to text replacement
This comment was minimized by the moderator on the site
compile error: User defined type not defined
This comment was minimized by the moderator on the site
Thanks for that sub routine - just the job!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations