Ինչպե՞ս HTML- ում վերափոխել տեքստի Excel- ում գտնվող բջիջներում:

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

Փնտրեք և փոխարինեք գործառույթով html- ը վերափոխեք տեքստի ընտրված բջիջներում
Վերափոխեք html տեքստը VBA- ի ամբողջ աշխատաթերթում

Փնտրեք և փոխարինեք գործառույթով html- ը վերափոխեք բջիջներում տեքստի

Դուք կարող եք բոլոր html- ները վերափոխել բջիջներում պարունակվող տեքստերի հետ Գտնել եւ փոխարինել գործառույթը Excel- ում: Խնդրում եմ, արեք հետևյալ կերպ.

1. Ընտրեք այն բջիջները, որոնք բոլոր html- ը կվերածեք տեքստերի և սեղմեք կոճակը Ctrl + F բացել ստեղները Գտնել եւ փոխարինել երկխոսության վանդակում:

2. Մեջ Գտնել եւ փոխարինել երկխոսության տուփ, անցեք Փոխարինել ներդիր, մուտքագրեք <*> մեջ Գտեք ինչ տուփ, պահիր Փոխարինել վանդակը դատարկ է և կտտացրեք Փոխարինեք բոլորը կոճակ Տեսեք,

3. Հետո ա Microsoft Excel- ը երկխոսության պատուհանը բացվում է ՝ ձեզ պատմելու համար, թե քանի html պիտակ է փոխարինվել, կտտացրեք OK կոճակը և փակել այն Գտնել եւ փոխարինել երկխոսության վանդակում:

Դրանից հետո դուք կարող եք տեսնել, որ html բոլոր պիտակները հանվում են ընտրված բջիջներից, ինչպես ցույց է տրված նկարում:

Վերափոխեք html տեքստը VBA- ի ամբողջ աշխատաթերթում

Բացի այդ, կարող եք ամբողջ html- ը վերափոխել տեքստի ամբողջ աշխատանքային թերթում, միևնույն ժամանակ, ստորև ներկայացված VBA կոդով:

1. Բացեք աշխատաթերթը պարունակում է html, որը դուք կվերածեք տեքստի, ապա սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, ապա VBA կոդի ներքո պատճենեք Մոդուլի պատուհանում:

VBA կոդ. HTML- ը վերափոխեք տեքստի ամբողջ աշխատանքային թերթում

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. Դեռևս Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Գործիքներ > Սայլակ, ստուգեք Microsoft VBScript- ի կանոնավոր արտահայտություն 5.5 տարբերակը Հղումներ-VBAP նախագիծ երկխոսության տուփ, ապա կտտացրեք OK կոճակը:

4. Սեղմեք F5 կոճակը գործելու համար սեղմեք կամ սեղմեք Run կոճակը:

Դրանից հետո բոլոր html պիտակները անմիջապես հանվում են ամբողջ աշխատանքային թերթից:

Առնչվող հոդվածներ քանակը:

• Ինչպե՞ս մասսայականորեն փոխել որպես տեքստ պահված համարները Excel- ում համարների:

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

🤖	Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
	Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
	Super Փնտրել: Բազմաթիվ չափանիշների VLookup  |   Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
	Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
	Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
	Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar   |  Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները   |  Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
	Լավագույն 15 գործիքների հավաքածու:  12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Կարդալ ավելին... Անվճար ներբեռնում...

---

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

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում...