Cum se transpun date din coloană într-o singură celulă în Excel?

Când trebuie să transpuneți o listă de date într-o singură celulă dintr-o foaie de lucru, în mod normal, puteți aplica Înlănţui funcția de a combina lista de celule într-o singură celulă, dar va fi complexă dacă există date imense care trebuie combinate. În acest articol, voi vorbi despre câteva trucuri rapide pentru a rezolva această sarcină în Excel.

Transpuneți datele din coloană într-o singură celulă cu funcția definită de utilizator

Transpuneți datele din coloană într-o singură celulă cu Kutools pentru Excel

Transpuneți datele din coloană într-o singură celulă cu funcția definită de utilizator

Cu excepția funcției Concatenare pentru a îmbina o listă de valori ale celulei, puteți aplica următorul cod VBA pentru a obține rezultatul cât mai repede posibil.

1. Țineți apăsat butonul ALT + F11 tastele și deschide fișierul Microsoft Visual Basic pentru aplicații fereastră.

2. Clic Insera > Moduleși lipiți următorul cod în Module Fereastră.

Cod VBA: transpuneți datele din coloană într-o singură celulă

Function transposeRange(Rg As Range)
'updateby Extendoffice
    Dim xCell As Range
    Dim xStr As String
    For Each xCell In Rg
        If Not IsEmpty(xCell.Value) Then
            xStr = xStr & xCell.Value & ","
        End If
    Next
    transposeRange = Left(xStr, Len(xStr) - 1)
End Function

3. Apoi salvați și închideți acest cod, reveniți la foaia de lucru și introduceți această formulă: = gamă de transpunere (A1: A10) într-o celulă goală pentru a pune rezultatul și apăsați Intrați tasta, veți obține toate valorile celulei dintr-o coloană au fost localizate într-o singură celulă, vedeți captura de ecran:

notițe: În codul de mai sus, A1: A10 este gama de liste pe care doriți să o transpuneți într-o singură celulă și, de asemenea, puteți separa conținutul combinat cu alți delimitatori, cum ar fi virgulă, liniuță, spațiu etc., doar schimbând virgula din script xStr = xStr & xCell.Value & ",".

Transpuneți datele din coloană într-o singură celulă cu Kutools for Exce

Dacă aveţi Kutools pentru Excel, cu instrumentul său puternic-Combina, puteți combina datele dintr-o coloană, rând sau într-un interval într-o singură celulă.

După instalare Kutools pentru Excel, vă rugăm să faceți următoarele :( Descărcați gratuit Kutools pentru Excel acum! )

1. Selectați coloana de date pe care doriți să o combinați într-o singură celulă.

2. Clic Kutools > Merge & Split > Combinați rânduri, coloane sau celule fără a pierde date, vezi captura de ecran:

3. În caseta de dialog pop-out, selectați Combinați într-o singură celulă în temeiul Pentru a combina celulele selectate conform următoarelor opțiuni, și apoi specificați un separator pentru a separa conținutul îmbinat, consultați captura de ecran:

4. Apoi apasa Ok or Aplică și veți obține următorul rezultat după cum aveți nevoie:

Descărcați și proba gratuită Kutools pentru Excel acum!

Demo: transpuneți datele din coloană într-o singură celulă cu Kutools for Exce

---

Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

• reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
• Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
• Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
• Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
• Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
• Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
• Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
• Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
• Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.

Citeşte mai mult ... Descărcare gratuită... Cumpărare... 

---

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

• Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
• Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
• Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!

Citeşte mai mult ... Descărcare gratuită... Cumpărare...