Hogyan lehet az oszlopból az adatokat egyetlen cellába átvinni az Excelben?
Ha az adatok listáját át kell ültetnie egy munkalap egyetlen cellájába, akkor általában alkalmazhatja a Összekapcsol funkcióval egyesítheti a cellák listáját egy cellába, de bonyolult lesz, ha hatalmas adatokat kell egyesíteni. Ebben a cikkben néhány gyors trükkről fogok beszélni, amelyek segítségével megoldhatja ezt a feladatot az Excel programban.
Az adatokat oszlopból egyetlen cellába helyezze át a felhasználó által definiált funkcióval
Transzponálja az adatokat az oszlopból egyetlen cellába a Kutools for Excel segítségével
Az adatokat oszlopból egyetlen cellába helyezze át a felhasználó által definiált funkcióval
A Cella összefűzés funkció kivételével a cellaértékek listájának egyesítéséhez a következő VBA kódot alkalmazhatja az eredmény lehető leggyorsabb eléréséhez.
1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.
2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modulok Ablak.
VBA-kód: Az oszlopból származó adatokat egyetlen cellába helyezheti át
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. Ezután mentse el és zárja be ezt a kódot, menjen vissza a munkalapra, és írja be ezt a képletet: = transzpozíciós tartomány (A1: A10) egy üres cellába az eredmény elhelyezéséhez, majd nyomja meg a gombot belép kulcsot, akkor megkapja, hogy az oszlop összes cellájának értéke egyetlen cellában legyen, lásd a képernyőképet:
Megjegyzések: A fenti kódban A1: A10 az a listatartomány, amelyet egyetlen cellába szeretne áthelyezni, és az egyesített tartalmat el is különítheti más elválasztókkal, például vesszővel, kötőjellel, szóközzel, csak a vessző megváltoztatásával a szkriptben xStr = xStr & xCell.Value & ",".
Az oszlop adatait egyetlen cellába helyezze át a Kutools for Exce segítségével
Ha van Kutools az Excel számára, erőteljes eszköz-Kombájn, oszlopban, sorban vagy tartományban lévő adatokat egyesíthet egy cellával.
| Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. |
Telepítése után Kutools az Excel számára, kérjük, tegye a következőket :( Ingyenesen töltse le a Kutools for Excel programot most! )
1. Válassza ki az egyetlen oszlopba egyesítendő adatoszlopot.
2. Kattints Kutools > Egyesítés és felosztás > Kombinálja a sorokat, oszlopokat vagy cellákat adatok elvesztése nélkül, lásd a képernyőképet:
3. A felbukkanó párbeszédpanelen válassza a lehetőséget Egyesítsd egyetlen cellába alatt a A kijelölt cellák egyesítése a következő lehetőségek szerint, majd adjon meg egy elválasztót az egyesített tartalom elválasztásához, lásd a képernyőképet:
4. Ezután kattintson Ok or alkalmaz gombra, és a következő eredményt kapja, amire szüksége van:
 |
 |
 |
Töltse le és ingyenes próbaverziója a Kutools for Excel programhoz most!
Bemutató: Az oszlop adatait egyetlen cellába helyezze át a Kutools for Exce segítségével
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
