Kako prenesti / pretvoriti stolpce in vrstice v eno vrstico?
Kako združiti več vrstic in stolpcev v eno dolgo vrstico? Mogoče se vam zdi enostavno, ker jih lahko kopirate enega za drugim in jih ročno združite v vrsto. Toda zamudno in dolgočasno bo, če bo na stotine vrstic in stolpcev. Tukaj bom govoril o nekaj hitrih trikih za njegovo rešitev.
Prenesite / pretvorite stolpce in vrstice v eno vrstico s formulo
Prenesite / pretvorite stolpce in vrstice v eno vrstico s kodo VBA
Prenesite / pretvorite stolpce in vrstice v eno vrstico s programom Kutools za Excel
- Ponovno uporabi vse: Med priljubljene dodajte najbolj uporabljene ali zapletene formule, grafikone in kar koli drugega ter jih v prihodnosti hitro ponovno uporabite.
- Več kot 20 besedilnih funkcij: Izvleček številke iz besedilnega niza; Izvleči ali odstrani del besedil; Pretvorite številke in valute v angleške besede.
- Združi orodja: Več delovnih zvezkov in listov v eno; Združi več celic / vrstic / stolpcev brez izgube podatkov; Združi podvojene vrstice in vsoto.
- Razdeljena orodja: Razdeli podatke na več listov na podlagi vrednosti; En delovni zvezek v več datotek Excel, PDF ali CSV; En stolpec na več stolpcev.
- Prilepi preskoči Skrite / filtrirane vrstice; Štetje in vsota glede na Barva ozadja; V večjem obsegu pošiljajte osebna e-poštna sporočila več prejemnikom.
- Super filter: Ustvarite napredne filtrirne sheme in uporabite za vse liste; Razvrščanje po tednih, dnevih, pogostosti in še več; filter s krepkim tiskom, formule, komentar ...
- Več kot 300 zmogljivih funkcij; Deluje z Office 2007-2021 in 365; Podpira vse jezike; Enostavna uvedba v vašem podjetju ali organizaciji.
Prenesite / pretvorite stolpce in vrstice v eno vrstico s formulo
Če imate nabor podatkov, kot prikazuje naslednja slika zaslona, lahko podatke o obsegu pretvorite v eno vrstico v novem delovnem listu z dolgo formulo.
Uporabite formulo tako:
1. V novem delovnem listu aktivnega delovnega zvezka kliknite celico A1, kopirajte in prilepite to formulo: =OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))
Opombe: List1! $ A $ 1 je sklic na delovni list in obseg, ki ga želite uporabiti.
VRSTICA () - 1) * 5 v zgornji formuli, 5 pomeni številko vrstice; in STOLPEC () - 1,4) / 4je 4 pomeni številko stolpca. Lahko jih spremenite po svoji potrebi.
2. Nato povlecite ročico za polnjenje v desno, dokler se ne prikaže številka 0. V tem primeru so bili vsi podatki v obsegu preneseni v eno vrstico na novem delovnem listu. Oglejte si posnetek zaslona:
Prenesite / pretvorite stolpce in vrstice v eno vrstico s kodo VBA
Naslednja koda VBA vam lahko pomaga tudi pretvoriti vrsto podatkov v eno vrstico.
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. klik Vstavi > Moduliin prilepite naslednjo kodo v Moduli okno.
Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
InputRng.Rows(i).Copy OutRng
Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub
3. Nato pritisnite F5 s tipko za zagon kode se odpre pogovorno okno, v katerem izberete vrsto vsebine, ki jo želite pretvoriti v vrstico, in kliknite Ok, drugo pojavno pogovorno okno je, da izberete eno celico, ki bo prikazala rezultat. Oglejte si posnetke zaslona:
![]() |
![]() |
![]() |
Nato kliknite Ok, se vsebina v izbranem obsegu pretvori v vrstico. Oglejte si posnetek zaslona:
![]() |
![]() |
![]() |
OpombeV Set OutRng = OutRng.Offset (0, xCols + 0)Lahko spremenite 0 na katero koli številko, ki ustreza vašim potrebam.
Če želite, da želite rezultate, ki ustrezajo prvotnim vrsticam, ločiti za en stolpec, lahko spremenite Set OutRng = OutRng.Offset (0, xCols + 0) do Set OutRng = OutRng.Offset (0, xCols + 1), so rezultati prikazani na naslednji način:
Prenesite / pretvorite stolpce in vrstice v eno vrstico s programom Kutools za Excel
Zdi se, da sta zgornji dve metodi za nas začetnike programa Excel nekoliko težki, tukaj bom govoril o priročnem orodju Kutools za Excel za vas.
Kutools za Excel vključuje več kot 300 priročnih orodij Excel. Brezplačno poskusite brez omejitev v 30 dneh. Get it now
S pripomočkom Območje preoblikovanja of Kutools za Excel, lahko hitro pretvorite obseg v eno vrstico, naredite naslednje:
1. Izberite obseg, ki ga želite prenesti.
2. klik Kutools > Pretvornik dosega > Območje preoblikovanja, glej posnetek zaslona:
3. V Ljubljani Območje preoblikovanja pogovorno okno, izberite Obseg do ene vrstice možnost, glej posnetek zaslona:
4. Nato kliknite OKin kliknite celico, da v izpiralno polje vnesete rezultat.
5. klik OK, podatki v obsegu pa so bili preneseni v eno vrstico. Oglejte si posnetke zaslona:
![]() |
![]() |
![]() |
Če želite izvedeti več o tej funkciji, obiščite Območje preoblikovanja.
Sorodni članki:
Kako spremeniti vrstico v stolpec v Excelu?
Kako prenesti / pretvoriti en stolpec v več stolpcev v Excelu?
Kako prenesti / pretvoriti stolpce in vrstice v en stolpec?
Najboljša orodja za pisarniško produktivnost
Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%
- Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
- Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
- Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
- Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
- Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
- Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
- Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
- Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
- Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.

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!











