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

Odstraňte nebo odstraňte značky html z textových řetězců

Pokud existuje více textových řetězců, které jsou obklopeny značkami html, můžete pro odstranění všech značek html použít metody v tomto článku.


Odstraňte nebo odeberte všechny jednoduché značky html pomocí vzorce

Pokud jsou vaše textové řetězce obklopeny několika jednoduchými html tagy, může vám MID tuto funkci vyřešit. Obecná syntaxe je:

=MID(string,text_start,LEN(string)-tag_len)
  • string: textový řetězec nebo hodnota buňky, ze které chcete odebrat značky html.
  • text_start: číslo pozice, na které se nachází první znak, který chcete použít.
  • tag_len: délka html tagů v textovém řetězci.

Zkopírujte nebo zadejte následující vzorec do prázdné buňky:

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

Poté přetáhněte popisovač výplně dolů do buněk, na které chcete použít tento vzorec, a všechny značky html byly z buněk odebrány, jak je znázorněno níže:


Vysvětlení vzorce:

LEN (A2) -7: Tato funkce LEN se používá k výpočtu délky textového řetězce v buňce A2 a odčítání 7 (počet html značek, počáteční i koncové značky) znamená získat počet znaků, které chcete extrahovat, které vylučují značka html. Vrácená hodnota bude použita jako argument num_chars v rámci funkce MID.

MID (A2,4, LEN (A2) -7): Tato funkce MID se používá k extrakci všech znaků, které začínají na čtvrtém znaku, a délka řetězce je počet znaků, které jsou vráceny funkcí LEN.


Odstraňte nebo odeberte některé složité značky html pomocí kódu VBA

Pokud je v textovém řetězci více značek html, jak je uvedeno níže, výše uvedený vzorec nemusí fungovat správně, v tomto případě vám následující kód VBA může pomoci vypořádat se s některými složitými značkami html v textových řetězcích.

1. Podržte Alt + F11 klíče v aplikaci Excel a otevře Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód VBA do okna modulu.

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. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a vyskakovací okno s výzvou, vyberte buňky, které chcete odebrat značky html, viz screenshot:

4. A pak klikněte OK tlačítko a všechny značky html byly odstraněny z vybraných buněk, viz screenshot:


Použité relativní funkce:

  • LEN:
  • Funkce LEN vrací počet znaků v textovém řetězci.
  • MID:
  • Funkce MID se používá k vyhledání a vrácení konkrétního počtu znaků ze středu zadaného textového řetězce.

Další články:


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel - pomůže vám vyniknout před davem

Rádi byste svou každodenní práci dokončili rychle a dokonale? Kutools pro Excel přináší 300 výkonných pokročilých funkcí (kombinace sešitů, součet podle barvy, rozdělení obsahu buněk, převod data a tak dále...) a ušetří vám 80 % času.

  • Navrženo pro 1500 pracovních scénářů, pomůže vám vyřešit 80 % problémů s Excelem.
  • Omezte každý den tisíce kliknutí na klávesnici a myš a ulehčete svým unaveným očím a rukám.
  • Staňte se odborníkem na Excel za 3 minuty. Už si nemusíte pamatovat žádné bolestivé vzorce a kódy VBA.
  • 30denní neomezená bezplatná zkušební verze. 60denní záruka vrácení peněz. Bezplatný upgrade a podpora po dobu 2 let.
Pás karet aplikace Excel (s nainstalovaným programem Kutools pro Excel)

Záložka Office - Povolte čtení a úpravy na záložkách v Microsoft Office (včetně Excelu)

  • Jednu sekundu přepnete mezi desítkami otevřených dokumentů!
  • Snižte stovky kliknutí myší každý den, sbohem s myší rukou.
  • Zvyšuje vaši produktivitu o 50% při prohlížení a úpravách více dokumentů.
  • Přináší efektivní karty do Office (včetně Excelu), stejně jako Chrome, Firefox a Nový Internet Explorer.
Snímek obrazovky aplikace Excel (s nainstalovanou kartou Office)
Komentáře (0)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL