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

Ինչպե՞ս հեռացնել բոլոր HTML պիտակները Excel- ի տողից:

Եթե ​​ունեք աշխատաթերթ, որը պարունակում է տեքստային տողեր, որոնք շրջապատված են HTML պիտակներով, հիմա, դուք ցանկանում եք հեռացնել բոլոր HTML պիտակները տողերից ՝ բջիջները պարզ և ավելի ընթեռնելի դարձնելու համար, ինչպես ցույց են տրված հետևյալ նկարները: Այս հոդվածում ես կներկայացնեմ Excel- ում այս խնդրի լուծման որոշ մեթոդներ:

doc հեռացնել html պիտակները 1
1
doc հեռացնել html պիտակները 2

Հեռացրեք բոլոր HTML պիտակները տեքստի տողից «Find and Replace» հրահանգով

Հեռացրեք բոլոր HTML պիտակները VBA կոդով տեքստի տողից


նետ կապույտ աջ պղպջակ Հեռացրեք բոլոր HTML պիտակները տեքստի տողից «Find and Replace» հրահանգով

Փաստորեն, այն Գտնել եւ փոխարինել Excel- ի ֆունկցիան կարող է լուծել այս խնդիրը, խնդրում ենք վարվել հետևյալ կերպ.

1, Ընտրեք այն բջիջները, որոնք ցանկանում եք հեռացնել HTML պիտակները:

2, Անցկացնել Ctrl + H բացել ստեղները Գտնել եւ փոխարինել երկխոսության տուփ, երկխոսության մեջ, Գտեք ինչ տեքստի տուփ, տեսակ <*>, և թողեք Փոխարինել տեքստի տուփը դատարկ է, տես նկարի նկարը.

doc հեռացնել html պիտակները 3

3. Այնուհետեւ կտտացրեք Փոխարինեք բոլորը կոճակը, բոլոր HTML պիտակները միանգամից հանվում են:


նետ կապույտ աջ պղպջակ Հեռացրեք բոլոր HTML պիտակները VBA կոդով տեքստի տողից

Հետևյալ VBA կոդը կարող է օգնել ձեզ հեռացնել HTML պիտակները ընտրությունից, արեք հետևյալը.

1, Պահեք պահեք Alt + F11 Excel- ի ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ VBA կոդը ՝ Մոդուլներ Պատուհանը:

VBA կոդ. Հեռացրեք բոլոր HTML պիտակները տեքստի տողից

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, Դրանից հետո սեղմեք F5 Այս կոդն աշխատեցնելու համար ստեղնաշարի երկխոսության մեջ խնդրում ենք ընտրել այն բջիջները, որոնք ցանկանում եք հեռացնել HTML պիտակները:

doc հեռացնել html պիտակները 4

4. Եվ հետո կտտացրեք OK, բոլոր HTML պիտակները միանգամից հանվել են ընտրությունից:

Անվճար ներբեռնեք Kutools Excel- ի համար հիմա:


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (7)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն VBA-ի միջոցով տեքստային տողից բոլոր HTML թեգերը հեռացնելու կոդի համար: Ես պատրաստվում եմ ձեր կայքը փոխանցել իմ գործընկերներին:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն! Ես կարողացա մաքրել մեծ excel ֆայլ VBA-ով ձեր պարզ հրահանգներով
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն .. VBA հրահանգներն աշխատեցին:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
xAddress երբեք չի օգտագործվում
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ես ունեմ որոշ տեքստ, որը գտնվում է կետային կետերում, երբ ես գործարկում եմ այս ծրագիրը, այն հանում է այն: ինչպես կարող եմ ընտրել, թե որ html թեգերը հեռացնել և որոնք պահել:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Вариант с <*> просто великолепен.
Շնորհակալություն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ֆորմատավորումը նույնպես հեռացվում է, ինչպես որ գտնում և փոխարինում է:

Շնորհակալություն կոդի և խորհուրդների համար:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից