Preskoči na glavno vsebino

Kako razdeliti dolg stolpec na več stolpcev v Excelu?

doc razdeljen na več stolpcev 4
Če imate v Excelu podatke z dolgimi stolpci, ki bodo pri ogledu težavni. Zdaj pa, če lahko tako dolg seznam razdelite na več stolpcev v Excelu, bo ogled olajšal.
Dolg stolpec razdelite na več stolpcev z VBA
Dolg stolpec razdelite na več stolpcev s programom Kutools za Excel dobra ideja3

puščica modri desni mehurček Dolg stolpec razdelite na več stolpcev z VBA

1. Pritisnite Alt + F11 tipke, da odprete Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduli in kopirajte naslednjo kodo VBA v pojavno okno.

VBA: razdeli dolg stolpec na več stolpcev.

Sub SplitColumn()
	'Updateby20141106
	Dim rng As Range
	Dim InputRng As Range
	Dim OutRng As Range
	Dim xRow As Integer
	Dim xCol As Integer
	Dim xArr As Variant
	xTitleId     = "KutoolsforExcel"
	Set InputRng = Application.Selection
	Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type: = 8)
	xRow         = Application.InputBox("Rows :", xTitleId)
	Set OutRng   = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
	Set InputRng = InputRng.Columns(1)
	xCol         = InputRng.Cells.Count / xRow
	ReDim xArr(1 To xRow, 1 To xCol + 1)
	For i = 0 To InputRng.Cells.Count - 1
		xValue = InputRng.Cells(i + 1)
		iRow = i Mod xRow
		iCol = VBA.Int(i / xRow)
		xArr(iRow + 1, iCol + 1) = xValue
	Next
	OutRng.Resize(UBound(xArr, 1), UBound(xArr, 2)).Value = xArr
End Sub

3. klik Run ali pritisnite F5 tipko za zagon VBA, odprlo se je pogovorno okno za izbiro seznama podatkov in nato kliknite OK Če želite v naslednjem pogovornem oknu določiti, koliko vrstic v enem stolpcu potrebujete, kliknite OK in izberite celico za prikaz rezultata. Oglejte si posnetke zaslona:

doc-split-to-multiple-colmns-1
doc-puščica
doc-split-to-multiple-colmns-2
doc-puščica
doc-split-to-multiple-colmns-3


4. klik OK, potem lahko vidite, da je dolg stolpec razdeljen na več stolpcev in ima vsak stolpec 15 celic.
doc-split-to-multiple-colmns-4


puščica modri desni mehurček Dolg stolpec razdelite na več stolpcev s programom Kutools za Excel

Mogoče nekateri od vas ne marate uporabljati kode VBA, na srečo pa lahko uporabite Območje preoblikovanja uporabnost Kutools za Excel za hitro in enostavno pretvorbo dolgega stolpca v določeno število stolpcev.

Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. 

Po namestitvi Kutools za Excel, naredite spodaj:(Brezplačno prenesite Kutools za Excel zdaj!)

1. Izberite podatke stolpca, ki jih želite razdeliti, in kliknite Kutools > Območje > Območje preoblikovanja. Oglejte si posnetek zaslona:
doc split kte 1

2. V pojavnem pogovornem oknu potrdite En stolpec za obseg možnost, nato preverite Fiksna vrednost in v polje za besedilo vnesite število stolpcev, ki jih potrebujete. Oglejte si posnetek zaslona:doc split kte 2

3. klik Ok in izberite eno celico, da razdelite razdeljene podatke. Oglejte si posnetek zaslona:
doc split kte 3

4. klik OK za dokončanje operacij. Zdaj so podatki dolgih stolpcev razdeljeni na tri stolpce.
doc split kte 4

Je lažje kot koda VBA? S Transform Range Pripomoček lahko vrstico pretvorite v obseg, obseg v vrstico ali en stolpec.

puščica modri desni mehurček Prenesite en stolpec / vrstico v obseg ali obratno



Hitro razdelite eno celico na stolpce ali vrstice glede na ločilo

V Excelu je razdeljevanje celice na stolpce s čarovnikom po korakih dolgočasno. Ampak s Kutools za Excel's Razdeljene celice pripomoček lahko: 1 pretvorite eno celico v stolpce ali vrstice glede na ločilo; 2, pretvori niz v besedilo in številko; 3, s kliki pretvori niz na podlagi določene širine.  Kliknite za 30-dnevno brezplačno preskusno različico vseh funkcij!
doc split celica
 
Kutools za Excel: z več kot 300 priročnimi dodatki za Excel lahko brezplačno preizkusite brez omejitev v 30 dneh.

Najboljša pisarniška orodja za produktivnost

Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...

zavihek kte 201905


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Really awesome...
This comment was minimized by the moderator on the site
Thank you so much!It's a big problem to copy web table to Excel.Thanks to your script I finally managed it.
This comment was minimized by the moderator on the site
Thank you!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations