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

Քերել կամ հեռացնել html պիտակները տեքստային տողերից

Եթե ​​կան բազմաթիվ տեքստային տողեր, որոնք շրջապատված են html պիտակներով, html բոլոր պիտակները հեռացնելու համար, այս հոդվածի մեթոդները կարող են լավություն բերել ձեզ:


Քաշեք կամ հանեք բոլոր պարզ html պիտակները բանաձևով

Եթե ​​ձեր տեքստային տողերը շրջապատված են մի քանի պարզ html պիտակներով, Excel- ի MID գործառույթը կարող է օգնել ձեզ լուծել այս աշխատանքը: Ընդհանուր շարահյուսությունն է.

=MID(string,text_start,LEN(string)-tag_len)
  • stringտեքստի տողի կամ բջիջի արժեքը, որից ուզում եք հեռացնել html պիտակները:
  • text_startդիրքի համարը, որը տեղադրեց առաջին նիշը, որը ցանկանում եք օգտագործել:
  • tag_len՝ html պիտակների երկարությունը տեքստի տողի մեջ:

Խնդրում ենք պատճենել կամ մուտքագրել հետևյալ բանաձևը դատարկ բջիջում.

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

Այնուհետև լրացրեք բռնիչը ներքև դեպի այն բջիջները, որոնք ցանկանում եք կիրառել այս բանաձևը, և ​​html բոլոր պիտակները հանվել են բջիջներից, ինչպես ցույց է տրված ստորև նշված էկրանի նկարը.


Բանաձևի բացատրություն.

LEN (A2) -7. Այս LEN ֆունկցիան օգտագործվում է A2 բջիջում տեքստի տողի երկարությունը հաշվարկելու համար և հանում է 7-ը (html պիտակների քանակը, և 'սկզբնական, և' վերջավոր պիտակները) նշանակում է ստանալ այն նիշերի քանակը, որոնք ցանկանում եք արդյունահանել, որոնք բացառվում են: html պիտակը: Վերադարձված արժեքը կօգտագործվի որպես num_chars փաստարկ MID գործառույթի շրջանակներում:

MID (A2,4, LEN (A2) -7)Այս MID գործառույթն օգտագործվում է բոլոր նիշերը հանելու համար, որոնք սկսվում են չորրորդ նիշից, և տողի երկարությունն այն թվերի նիշերն են, որոնք վերադարձել են LEN գործառույթը:


Քաշեք կամ հեռացրեք որոշ բարդ html պիտակներ VBA կոդով

Եթե ​​տեքստի տողի մեջ կան բազմաթիվ html պիտակներ, ինչպես ցույց է տրված նկարից ներքևում, վերը նշված բանաձևը կարող է ճիշտ չաշխատել, այս դեպքում հետևյալ VBA կոդը կարող է օգնել ձեզ գործ ունենալ html տողերի մի շարք բարդ պիտակների հետ:

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

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

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 պիտակները, տե՛ս նկար

4, Եվ հետո, կտտացրեք OK կոճակը, և html բոլոր պիտակները հանվել են ընտրված բջիջներից, տես նկարի նկարը.


Օգտագործված հարաբերական գործառույթները.

  • LEN:
  • LEN ֆունկցիան վերադարձնում է տեքստի տողի նիշերի քանակը:
  • MID:
  • MID գործառույթն օգտագործվում է տվյալ տողի տողի միջից որոշակի թվով նիշերի գտնելու և վերադարձնելու համար:

Այլ հոդվածներ.


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

Kutools Excel- ի համար - օգնում է ձեզ առանձնանալ բազմությունից

Ցանկանու՞մ եք արագ և կատարյալ ավարտել ձեր ամենօրյա աշխատանքը: Kutools-ը Excel-ի համար բերում է 300 հզոր առաջադեմ առանձնահատկություններ (համատեղել աշխատանքային գրքերը, գումարել ըստ գույնի, բաժանել բջիջների բովանդակությունը, փոխակերպման ամսաթիվը և այլն...) և խնայել 80% ժամանակ ձեզ համար:

  • Նախատեսված է 1500 աշխատանքային սցենարների համար, օգնում է ձեզ լուծել Excel-ի 80% խնդիրներ:
  • Կրճատեք ստեղնաշարի և մկնիկի հազարավոր կտտոցներ ամեն օր, թեթեւացրեք ձեր հոգնած աչքերն ու ձեռքերը:
  • Դարձեք Excel փորձագետ 3 րոպեի ընթացքում: Այլևս կարիք չկա հիշելու ցավոտ բանաձևեր և VBA կոդեր:
  • 30-օրյա անսահմանափակ անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք: Անվճար արդիականացում և աջակցություն 2 տարի ժամկետով:
Excel ժապավեն (տեղադրված է Excel- ի համար նախատեսված Kutools)

Office Tab - Միացնել ներդիրներով ընթերցումը և խմբագրումը Microsoft Office- ում (ներառիր Excel)

  • Մեկ վայրկյան ՝ տասնյակ բաց փաստաթղթերի միջև փոխելու համար:
  • Նվազեցրեք ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ, հրաժեշտ տվեք մկնիկի ձեռքին:
  • Բարձրացնում է ձեր արտադրողականությունը 50% -ով ՝ բազմաթիվ փաստաթղթեր դիտելիս և խմբագրելիս:
  • Արդյունավետ ներդիրներ է բերում գրասենյակ (ներառյալ Excel- ը), ճիշտ այնպես, ինչպես Chrome- ը, Firefox- ը և նոր Internet Explorer- ը:
Excel- ի էկրանային նկար (տեղադրված է Office ներդիրով)
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (0)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

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