Conas colúin a chruachadh ó chlé go deas i gcolún amháin in Excel?

Má cheaptar go bhfuil ilcholúin ann, is é an jab na colúin a chruachadh ó chlé go deas i gcolún amháin mar a thaispeántar thíos. Ach amháin na colúin a bhogadh de láimh ceann ar cheann, an bhfuil aon chleasanna ann chun é seo a réiteach in Excel?

Stack colúin ó chlé go deas go colún amháin le VBA

Stack colúin ó chlé go deas go colún amháin le Kutools for Excel

Stack colúin ó chlé go deas go colún amháin le VBA

In Excel, níl aon fheidhm ionsuite ann chun an post seo a láimhseáil, ach, is féidir leis an gcód VBA cabhrú leat.

1. Brúigh Alt + F11 eochracha, ansin sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Modúil chun modúl bán nua a chruthú.

2. Cóipeáil agus greamaigh thíos an cód leis an Modúil.

VBA: Stack colúin i gceann amháin

Sub StackColumns()
'UpdatebyExtendoffice20180814
Dim xSRg, xDRg As Range
Dim xDWS As Worksheet
Dim xIntDR, xIntDC, xI As Long
Dim xFNumR, xFNumC As Long
On Error GoTo Err1
Set xSRg = Application.InputBox("Select Columns:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then
Err1:
    Application.ScreenUpdating = True
    Exit Sub
End If
Set xDRg = Application.InputBox("Select a cell to place result:", "Kutools for Excel", xTxt, , , , , 8)
If xDRg Is Nothing Then
    Exit Sub
End If
Application.ScreenUpdating = False
Set xDWS = xDRg.Worksheet
xIntDR = xDRg.Row
xIntDC = xDRg.Column
xI = 0
    For xFNumC = 1 To xSRg.Columns.Count
        For xFNumR = 1 To xSRg.Rows.Count
            Set xDRg = xDWS.Cells(xIntDR + xI, xIntDC)
            xDRg.Value = xSRg.Cells(xFNumR, xFNumC).Value
            xI = xI + 1
        Next xFNumR
    Next xFNumC
Application.ScreenUpdating = True
End Sub

3. Brúigh F5 eochair chun an cód a rith, tagann dialóg amach duit chun na colúin a dhéanfaidh tú a chruachadh i gceann a roghnú.

4. cliceáil OK, roghnaigh cill chun an toradh a chur.

5. cliceáil OK Críoch. Anois tá na colúin roghnaithe cruachta i gcolún amháin.

Stack colúin ó chlé go deas go colún amháin le Kutools for Excel

Má tá tú Kutools le haghaidh Excel suiteáilte in Excel, is féidir leat an Transform Range fóntais chun an post seo a láimhseáil.

Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil:Download Kutools Íoslódáil saor in aisce do Excel Anois!)

1. Roghnaigh na colúin is mian leat a chruachadh, cliceáil Kutools > Raon > Transform Range.

2. Sa Transform Range dialóg, seiceáil Range to single row bosca seiceála, cliceáil Ok.

3. Sa dialóg popping, roghnaigh cill chun an toradh a chur, cliceáil OK.

Anois tá na colúin athraithe go dtí a chéile.

4. Roghnaigh an tsraith aonair, brúigh Ctrl + C chun é a chóipeáil, agus cill eile a roghnú a chuirfidh an colún cruachta, cliceáil ar dheis chun roghnú Transpose(T) sa roghchlár comhthéacs.

Anois tá an tsraith aonair aistrithe go colún cruachta.

  Raon trasuí

---

Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

• Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
• Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
• Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
• Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
• Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
• Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
• Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
• Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
• Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.

Leigh Nios mo... Íoslódáil saor in aisce ... Ceannach ... 

---

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

• Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
• Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
• Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!

Leigh Nios mo... Íoslódáil saor in aisce ... Ceannach ...