Kaip "Excel" padalyti kableliais atskirtas vertes į eilutes arba stulpelius

  • Pasidalinti
Hugh West

Kartais, dirbant "Microsoft Excel , mums reikia išskaidyti kableliais atskirtas ištisines vieno stulpelio reikšmes į skirtingus stulpelius arba eilutes. Kai importuojame iš kitų programų sugeneruotus duomenis į "Excel", visi duomenys gali būti patalpinti viename stulpelyje; atskirti kableliu. Be to, mums gali prireikti išskirti tam tikrą duomenų dalį, atsižvelgiant į reikalavimus. Šis straipsnis padės jums išskaidyti kableliais atskirtas reikšmes į kelisstulpelius ir eilutes, naudodami kelias funkcijas ir ypatybes.

Atsisiųsti praktikos sąsiuvinį

Galite atsisiųsti pratybų sąsiuvinį, kurį naudojome rengdami šį straipsnį.

Kableliais atskirtų verčių skaidymas į eilutes arba stulpelius.xlsm

5 kableliais atskirtų verčių padalijimo į eilutes arba stulpelius "Excel" programoje būdai

1. Atskirkite duomenis į eilutes / stulpelius kableliu naudodami "Excel" funkciją "Tekstas į stulpelius

1.1. Suskirstykite vertes į stulpelius

Pirmiausia naudosiu Tekstas į stulpelius "Excel" funkcija, skirta duomenims padalyti į kelis stulpelius. Tai paprasčiausias būdas atskirti duomenis į stulpelius. Tarkime, turime duomenų rinkinį, kuriame yra keletas vaisių, esančių stulpelyje ir atskirtų kableliu. 3 vaisius kiekviename langelyje. Dabar stulpelio vaisius padalysiu į B į 3 skirtingus stulpelius (stulpelius C , D & E ).

Atlikite toliau nurodytus veiksmus, kad atliktumėte užduotį.

Žingsniai:

  • Pirmiausia pasirinkite visą duomenų rinkinį ir eikite į Duomenys > Duomenų įrankiai > Tekstas į stulpelius .

  • Dėl to Teksto į stulpelius vedlys pasirodo. Dabar iš Pirminis duomenų tipas skyriuje pasirinkite Su ribomis ir spustelėkite Kitas .

  • Tada iš Skiriamieji ženklai skirsnyje pažymėkite varnele Kablelis ir paspauskite Kitas .

  • Po to pasirinkite Paskirties vieta vieta (čia, Ląstelė C5 ) ir paspauskite Apdaila .

  • Galiausiai, uždarius Teksto į stulpelius vedlys , gausime toliau pateiktą rezultatą. Visi kableliais atskirti duomenys suskirstyti į stulpelius C , D , ir E .

Skaityti daugiau: Kaip padalyti vienos "Excel" ląstelės duomenis į kelis stulpelius (5 metodai)

1.2. Suskirstymas į eilutes naudojant tekstą į stulpelius

Dabar kableliu atskirtas reikšmes suskirstysiu į kelios eilutės Tarkime, turiu toliau pateiktą duomenų rinkinį, kuriame yra kai kurių vaisių pavadinimai. Prieš sudėdamas šias reikšmes į kelias eilutes, suskirstysiu jas į stulpelius naudodamas Tekstas į stulpelius funkcija.

Žingsniai:

  • Pirmiausia pasirinkite Ląstelė B5 , eikite į Duomenys > Tekstas į stulpelius .
  • Tada iš Teksto į stulpelius vedlys pasirinkite Pirminis duomenų tipas : Su ribomis ir spustelėkite Kitas .
  • Dabar pasirinkite Skiriamieji ženklai tipas: Kablelis ir spustelėkite Kitas .
  • Po to pasirinkite Paskirties vieta ląstelė (čia Ląstelė C5 ) ir paspauskite Apdaila .
  • Dėl to gausite toliau pateiktą išvestį. Dabar gautus duomenis išdėstysiu keliose eilutėse. Tam nukopijuokite diapazoną C5:G5 .

  • Vėliau dešiniuoju pelės klavišu spustelėkite Ląstelė B7 ir pasirinkite Transponuoti Įklijuoti parinktys (žr. ekrano nuotrauką).

  • Galiausiai gausime rezultatą, kurio ieškojome - visos kableliais atskirtos reikšmės bus suskirstytos į eilutes 7 į 11 .

Skaityti daugiau: Kaip padalyti duomenis "Excel" programoje (5 būdai)

2. "Excel Power Query" užklausa kableliais atskirtoms vertėms padalyti į stulpelius arba eilutes

2.1. "Power Query" užklausa, skirta suskirstyti vertes į stulpelius

Šį kartą naudosiu "Excel "Power Query" užklausa padalyti kableliais atskirtus duomenis į kelis stulpelius. Norėdami atlikti šią užduotį, vadovaukitės toliau pateiktais nurodymais.

Žingsniai:

  • Pirmiausia pastatykite žymeklį į bet kurį esamo duomenų rinkinio langelį. Tada eikite į Duomenys > Iš lentelės / diapazono ( Gauti ir transformuoti duomenis grupė).

  • Todėl "Excel" paprašys jūsų konvertuoti duomenų intervalą į lentelę. Pažymėkite duomenų intervalą ir paspauskite GERAI sukurti lentelę.

  • Dėl to "Power Query Editor rodomas langas su toliau pateikta lentele. Dabar iš "Power Query Editor langas eikite į Pagrindinis > Padalyti stulpelį > Pagal Delimiter .

  • Po to Skirstyti stulpelį pagal skirtuką rodomas dialogo langas. Pasirinkite Kablelis Pasirinkite arba įveskite skirtuką ir paspauskite GERAI (žr. ekrano nuotrauką).

  • Todėl "Excel" padalina lentelę į 3 stulpelius, kaip nurodyta toliau. Dabar, norėdami uždaryti "Power Query Editor , eikite į Pagrindinis > Uždaryti & amp; Įkelti > Uždaryti & amp; Įkelti .

  • Galiausiai pateikiame galutinį gautą rezultatą. Visi kableliais atskirti duomenys suskirstomi į 3 lentelės stulpelius.

Skaityti daugiau: Kaip "Excel" padalyti duomenis į kelis stulpelius

2.2. Duomenų skaidymas į eilutes

Čia kableliu atskirtas reikšmes suskirsiu į kelias eilutes naudodamas "Excel Power Query" užklausa .

Žingsniai:

  • Turime keletą kableliais atskirtų vaisių Ląstelė B5 & C5 . Taikyti "Power Query" užklausa prie šių verčių, spustelėkite Ląstelė B5 arba C5 ir eikite į Duomenys > Iš lentelės / diapazono .

  • Toliau Sukurti lentelę bus rodomas dialogo langas, patikrinkite lentelės diapazoną ir paspauskite GERAI . Todėl toliau pateikta lentelė bus sukurta "Power Query Editor langas.
  • Tada pasirinkite lentelę, eikite į Pagrindinis > Padalyti stulpelį > Pagal Delimiter .

  • Dabar Skirstyti stulpelį pagal skirtuką rodomas dialogo langas. Pasirinkite arba įveskite skirtuką pasirinkite skyrių Kablelis , eikite į Išplėstinės parinktys ir spustelėkite Eilutės iš lauko: Padalyti į . Kai baigsite, paspauskite GERAI .

  • Paspaudus GERAI , gausime toliau pateiktą išvestį. Eikite į Pagrindinis > Uždaryti & amp; Įkelti > Uždaryti & amp; Įkelti rodyti rezultatą "Excel" darbalapyje.

  • Galiausiai gavome tokį galutinį rezultatą. Visos kableliais atskirtos reikšmės suskirstytos į eilutes 2 į 7 .

3. Derinkite LEFT, RIGHT, MID, FIND & amp; LEN funkcijas kableliais atskirtoms reikšmėms padalyti į stulpelius

Kableliais atskirtiems duomenims suskirstyti į kelis stulpelius galime naudoti "Excel" funkcijas. Iš esmės, naudodami "Excel" funkcijų derinius pagal skirtuką (kablelis, tarpas, kabliataškis), galime išskirti duomenų dalis skirtinguose stulpeliuose. Šiuo metodu išskirsiu duomenis iš 3 pozicijas iš ištisinės teksto eilutės, esančios stulpelyje B ir sudėkite juos į kelis stulpelius.

3.1. Rasti pirmąjį žodį

Iš pradžių iš nepertraukiamo teksto eilutės išskirsiu pirmąjį žodį naudodamas LEFT ir RASTI funkcijos.

Žingsniai:

  • Įveskite toliau pateiktą formulę Ląstelė C5 ir paspauskite Įveskite iš klaviatūros.
=LEFT(B5,FIND(",",", B5)-1)

  • Įvedus formulę, "Excel" grąžins Datos ', kuris yra pirmasis žodis Ląstelė B5 .

Čia RASTI funkcija grąžina 1. kablelis. Tada LEFT funkcija išskiria pirmąjį žodį prieš pirmąjį kablelį.

3.2. Ištrauka 2-asis žodis

Dabar naudosiu derinį MID ir RASTI funkcijos, skirtos antrajam žodžiui išgauti iš Ląstelė B5 .

Žingsniai:

  • Įveskite šią formulę D5 langelis ir paspauskite Įveskite .
=MID(B5,FIND(",",B5)+1,FIND(",",B5,FIND(",",B5)+1)-FIND(",",B5)-1)

  • Todėl pagal pirmiau pateiktą formulę gaunama Vynuogės ; 2. žodis apie Ląstelė B5 .

Čia MID funkcija grąžina simbolius iš teksto eilutės vidurio Ląstelė B5 . ir RASTI funkcija grąžina 2. eilutė in Ląstelė B5 .

3.3. Raskite trečiąjį žodį

Tarkime, aš išgausiu 3. žodis iš Ląstelė B5 pagal kablelio vietą. 3. žodis, aš naudosiu DEŠINĖ , LEN , ir RASTI funkcijos.

Žingsniai:

  • Įveskite toliau pateiktą formulę D5 langelis . Tada paspauskite Įveskite .
= DEŠINĖ(B5, LEN(B5)-IEŠKOTI(",", B5,RASTI(",",B5)+1))

  • Kai paspausite Įveskite , Excel grąžins Arbūzas kuris yra 3. žodis mūsų nuolatinių duomenų Ląstelė B5 .

Čia LEN funkcija grąžina ilgį Ląstelė B5 . Tada RASTI funkcija grąžina kablelio vietą Ląstelė B5 . Vėliau, atsižvelgiant į rezultatus RASTI ir LEN funkcijos DEŠINĖ funkcija ištraukia dešinįjį žodį iš Ląstelė B5 .

  • Kaip aš gavau visus 1. , 2. , ir 3. žodžius skirtinguose stulpeliuose pirmoje eilutėje, dabar pabandysiu gauti panašų rezultatą likusiose eilutėse. Norėdami tai padaryti, pasirinkite intervalą C5:D5 ir naudokite Užpildymo rankena ( + ) įrankis.

  • Galiausiai čia pateikiamas galutinis rezultatas, kurį gausime.

4. "Excel" VBA kableliais atskirtoms vertėms padalyti į stulpelius arba eilutes

4.1. VBA, skirta suskirstyti vertes į stulpelius

Kableliu atskirtus duomenis galite suskirstyti į kelis stulpelius naudodami paprastą VBA kodas.

Žingsniai:

  • Pirmiausia eikite į darbalapį, kuriame norite suskirstyti duomenis. Tada dešiniuoju pelės klavišu spustelėkite lapo pavadinimą ir spustelėkite Peržiūrėti kodą įkelti VBA langas.

  • Tada įveskite toliau pateiktą kodą į Modulis ir Paleisti kodą naudodami F5 raktas.
 Sub SplitData() Dim Range() As String, Count As Long, x As Variant For r = 5 To 10 Range = Split(Cells(r, 2), ",") Count = 3 For Each x In Range Cells(r, Count) = x Count = Count + 1 Next x Next r End Sub 

Čia ' r ' nurodo eilutes, kuriose yra duomenų. Kita vertus, ' Count=3 ' nurodo stulpelį C , kuris yra pirmasis stulpelis, kuriame rodomi suskirstyti duomenys.

  • Paleidus kodą, kableliais atskirti duomenys stulpelyje B suskirstyti į stulpelius C , D , ir E kaip nurodyta toliau:

4.2. Suskirstykite vertes į eilutes

Dabar kableliais atskirtas reikšmes suskirstysiu į skirtingas eilutes naudodamasis "Excel VBA". Atlikite toliau nurodytus veiksmus, kad atliktumėte užduotį.

Žingsniai:

  • Pirmiausia eikite į darbalapį, kuriame turite duomenų, ir dešiniuoju pelės klavišu spustelėkite Peržiūrėti kodą .

  • Todėl VBA Pasirodo langas. Įrašykite toliau pateiktą kodą į Modulis ir rin kodą paspausdami F5 ant klaviatūros.
 Sub SplitRows() Dim rng As Range Dim rng1 As Range Dim cell As Range Dim N As Long Dim address As String Dim update As Boolean Dim ret As Variant On Error Resume Next address = Application.ActiveWindow.RangeSelection.address Set rng = Application.InputBox("Please enter a range", "Input Box", address, , , , , , 8) Set rng = Application.Intersect(rng, rng.Worksheet.UsedRange) If rng Is Nothing ThenExit Sub If rng.Columns.Count> 1 Then MsgBox "Cannot select more than one column" Exit Sub End If Set rng1 = Application.InputBox("Destination Cell", "Input Box", , , , , , , 8) Set rng1 = rng1.Range("A1") If rng1 Is Nothing Then Exit Sub update = Application.ScreenUpdating Application.ScreenUpdating = False For Each cell In rng ret = Split(cell.Value, ",") rng1.Worksheet.Range(rng1.Offset(N,0), rng1.Offset(N + UBound(ret, 1), 0)) = Application.WorksheetFunction.Transpose(ret) N = N + UBound(ret, 1) + 1 Next Application.ScreenUpdating = update End Sub 

  • Dabar, kai paleisite kodą, pasirodys toliau pateiktas įvesties langas, įveskite toliau pateiktą duomenų intervalą ir paspauskite GERAI .

  • Todėl atsiras kitas įvesties langelis. Įterpkite į jį paskirties langelį ir paspauskite GERAI .

  • Galiausiai gausime toliau pateiktą išvestį. Visos kableliais atskirtos mūsų duomenų rinkinio reikšmės suskirstytos į eilutes 8 į 13 .

5. Naudokite "Excel Flash Fill" kableliais atskirtoms vertėms padalyti į skirtingus stulpelius

Dalį kableliais atskirtų duomenų galime įvesti į kitą stulpelį ir tada taikyti Blykstės užpildymas funkcija, kad gautumėte likusius to paties modelio duomenis.

Žingsniai:

  • Tipas ' Datos ' in Ląstelė C5 Vėliau, kai pradėsite rašyti R ' in Ląstelė C6 , "Excel" supranta, kad noriu vaisių pirmoje pozicijoje iš visų eilučių.

  • Tiesiog paspauskite Įveskite kad gautumėte toliau pateiktą rezultatą. Dabar galite taikyti šį panašų metodą ir kitoms kableliais atskirtoms reikšmėms suskirstyti į kelis stulpelius.

Išvada

Pirmiau pateiktame straipsnyje bandžiau išsamiai aptarti keletą metodų, skirtų kableliais atskirtoms reikšmėms išskirstyti į eilutes arba stulpelius Excel programoje. Tikiuosi, kad šių metodų ir paaiškinimų pakaks jūsų problemoms išspręsti. Praneškite man, jei turite kokių nors klausimų.

Hugh Westas yra labai patyręs Excel treneris ir analitikas, turintis daugiau nei 10 metų patirtį šioje srityje. Jis yra įgijęs apskaitos ir finansų bakalauro bei verslo administravimo magistro laipsnius. Hugh turi aistrą mokymui ir sukūrė unikalų mokymo metodą, kurį lengva sekti ir suprasti. Jo ekspertinės žinios apie „Excel“ padėjo tūkstančiams studentų ir specialistų visame pasaulyje tobulinti savo įgūdžius ir tobulėti savo karjeroje. Savo tinklaraštyje Hugh dalijasi savo žiniomis su pasauliu, siūlydamas nemokamus „Excel“ vadovėlius ir internetinius mokymus, kad padėtų asmenims ir įmonėms išnaudoti visą savo potencialą.