Preskoči na glavno vsebino

Kako pretvoriti html v besedilo v celicah v Excelu?

Kot je prikazano spodaj na sliki zaslona, ​​kako jih lahko pretvorite v navadno besedilo v Excelu, če obstajajo številke html oznak v celicah vašega delovnega lista? Ta članek vam bo pokazal dva načina za odstranitev vseh oznak html iz celic v Excelu.

Pretvorite html v besedilo v izbranih celicah s funkcijo Najdi in zamenjaj
Pretvorite html v besedilo na celotnem delovnem listu z VBA


Pretvorite html v besedilo v celicah s funkcijo Najdi in zamenjaj

Vse html lahko pretvorite v besedila v celicah s pomočjo Poišči in zamenjaj funkcija v Excelu. Naredite naslednje.

1. Izberite celice, v katere boste pretvorili ves html, in pritisnite tipko Ctrl + F tipke za odpiranje Poišči in zamenjaj pogovorno okno.

2. V Ljubljani Poišči in zamenjaj pogovorno okno, pojdite na Zamenjaj zavihek, vnesite <*> v Našli kaj , obdržite Zamenjaj z polje prazno in kliknite Zamenjaj vse . Oglejte si posnetek zaslona:

3. Nato a Microsoft Excel Pojavi se pogovorno okno, ki vam pove, koliko html oznak je bilo zamenjanih, kliknite OK in zaprite Poišči in zamenjaj pogovorno okno.

Nato lahko vidite, da so vse html oznake odstranjene iz izbranih celic, kot je prikazano spodaj.


Pretvorite html v besedilo na celotnem delovnem listu z VBA

Poleg tega lahko hkrati pretvorite ves html v besedilo na celotnem delovnem listu s spodnjo kodo VBA.

1. Odprite delovni list, ki vsebuje html, ki ga želite pretvoriti v besedilo, nato pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli, nato kopirajte spodnjo kodo VBA v okno modula.

Koda VBA: Pretvorite html v besedilo na celotnem delovnem listu

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. Še vedno v Microsoft Visual Basic za aplikacije okno, kliknite Orodja > Reference, preverite Microsoft VBScript Regularni izraz 5.5 možnost v Reference-VBAProject pogovorno okno in nato kliknite OK gumb.

4. Pritisnite F5 tipko ali kliknite gumb Zaženi, da zaženete kodo.

Nato se vse html oznake takoj odstranijo s celotnega delovnega lista.


Sorodni članki:

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
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