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ă.
Kutools pentru Excel : cu mai mult de 300 de programe de completare Excel la îndemână, gratuit pentru a încerca fără limitări în 30 de zile. |
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 de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
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!