Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako hitro staknite več stolpcev v en stolpec v Excelu?

v Excelu lahko funkcija Besedilo do stolpcev deli celico v več stolpcev na podlagi ločila, vendar, če obstajajo načini za združitev več stolpcev v en stolpec, kot je prikazano na sliki spodaj? V tem članku bom predstavil nekaj trikov pri hitro reševanju te naloge.
doc stack stolpcev na eno 1

Vstavite več stolpcev v eno s formulo

Vstavite več stolpcev v eno z VBA

Vstavite več stolpcev v eno s Transform Range dobra ideja3


Vstavite več stolpcev v eno s formulo


1. Izberite obseg, ki ga želite zbrati, in pojdite na ime Box da to območje dobite ime in pritisnite Vnesite ključ. Prikaz slike:
doc stack stolpcev na eno 2

2. Nato izberite prazno celico, ki jo želite postaviti, vnesite to formulo =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1), pritisnite Enter in potegnite ročico za polnjenje navzdol, dokler se ne prikaže napaka. Prikaz slike:
doc stack stolpcev na eno 3

V formuli je MyData ime, ki ste ga navedli v koraku 1.

Vstavite več stolpcev v eno z VBA

Tukaj je VBA koda, ki vam lahko pomaga tudi.

1. Pritisnite Alt + F11 tipke za prikaz Microsoft Visual Basic za aplikacije okno.

2. klik Vstavi > Moduli, prilepite spodnjo kodo na Moduli.

VBA: Stack stolpce na eno

Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

doc stack stolpcev na eno 4

3. Pritisnite F5 Če želite zagnati kodo, se prikaže pogovorno okno, da izberete izvorne podatke in kliknite OK, da izberete celico, kamor želite dati rezultate. Prikaz slike:
doc stack stolpcev na eno 5

4. klik OK. Zdaj so stolpci zloženi v enem stolpcu.
doc stack stolpcev na eno 6


Vstavite več stolpcev v eno s Transform Range

Nanesti Kutools za ExcelJe Transformski obseg pripomoček vam lahko pomaga hitro rešiti ta problem.

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

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

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

1. Izberite podatke o stolpcih, ki jih uporabljate, in kliknite Kutools > Območje > Transformski obseg. Prikaz slike:
doc stack stolpcev na eno 8

2. V Ljubljani Transformski obseg pogovor, preveri Razpon v posameznem stolpcu možnost in kliknite Ok, nato pa izberite celico, ki bo dala rezultate. Prikaz slike:
doc stack stolpcev na eno 9

3. klik OK. Zdaj so stolpci zloženi v en sam stolpec.
doc stack stolpcev na eno 1


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Susan Millard · 21 days ago
    I am using the Stack Multiple Columns Into One With Formula method and it worked perfectly, but I want it to maintain the formatting, i.e. some columns were bold & 1 was hyperlinks. Is there something that can be added to the formula to make this happen?
  • To post as a guest, your comment is unpublished.
    Tom · 3 months ago
    I am attempting to do this over a very large table (100s of columns and rows that are all linked to formulas. My excel will keep loading and then ultimately go to not responding. Is there a way to get past this? Thanks
    • To post as a guest, your comment is unpublished.
      Sunny · 1 months ago
      Hi, Tom, which method you apply does not work? The method three, transform range tool must can work.
  • To post as a guest, your comment is unpublished.
    Chris Blackburn · 4 months ago
    Hi, I'm looking to go a step further with this. I've used Stack Multiple Columns Into One With VBA, code and this works. I've used Tables as the source with this code and I get the list. Is there a way to automate running the Macro? So that when I add a new entry into the table the Macro automatically runs and keeps the resulting list up to date?
    • To post as a guest, your comment is unpublished.
      Sunny · 3 months ago
      Hi, Chris Blackburn, sorry I am affraid I cannot find a code can automatically run to update the result, maybe someone else can.
  • To post as a guest, your comment is unpublished.
    tom · 9 months ago
    Hi, is there a way to make the formula ignore any blank cells your data may contain?


    =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1),


    I am using a helper sheet to create a contiguous list for a data validation drop down list. Thanks in advance.
    • To post as a guest, your comment is unpublished.
      Sunny · 8 months ago
      Sorry, I am not good at formula, maybe you can try to use Kutools for Excel's Select Nonblank cells utility to select the unempty cells firstly, and copy and paste them to another location, then use above methods.
  • To post as a guest, your comment is unpublished.
    Gokce · 9 months ago
    I have data which ends at the same row but multiple columns in which I want them to be stacked in a sequence where B column data will go under A column data where the data ends for A column and C column data to go under A column data where the data from B column ends and so on. This way I will have data from multiple columns to fit into one column. How can I do that?