Sut i drosi data o'r golofn yn un gell sengl yn Excel?
Pan fydd angen i chi drawsosod rhestr o ddata yn un gell sengl mewn taflen waith, fel arfer, gallwch chi gymhwyso'r Concatenate swyddogaeth i uno'r rhestr o gelloedd yn un gell, ond, bydd yn gymhleth os oes angen cyfuno data enfawr. Yr erthygl hon, byddaf yn siarad am rai triciau cyflym i chi ddatrys y dasg hon yn Excel.
Trosi data o'r golofn yn un gell sengl gyda Swyddogaeth Diffiniedig Defnyddiwr
Trawsosod data o golofn i un gell sengl gyda Kutools for Excel
Trosi data o'r golofn yn un gell sengl gyda Swyddogaeth Diffiniedig Defnyddiwr
Ac eithrio'r swyddogaeth Concatenate i uno rhestr o werthoedd celloedd, gallwch gymhwyso'r cod VBA canlynol i gael y canlyniad cyn gynted ag y gallwch.
1. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.
Cod VBA: Trosi data o'r golofn yn un gell sengl
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. Yna arbedwch a chau'r cod hwn, ewch yn ôl y daflen waith, a nodi'r fformiwla hon: = trawsosod (A1: A10) i mewn i gell wag i roi'r canlyniad, a gwasgwch Rhowch allwedd, fe gewch fod yr holl werthoedd celloedd mewn colofn wedi'u lleoli mewn un gell, gweler y screenshot:
Nodyn: Yn y cod uchod, A1: A10 yw'r ystod rhestr rydych chi am ei thrawsnewid yn un gell sengl, a hefyd, gallwch chi wahanu'r cynnwys unedig â delimiters eraill, fel coma, dash, gofod, ac ati trwy newid y coma yn y sgript yn unig. xStr = xStr & xCell.Value & ",".
Trosi data o'r golofn yn un gell sengl gyda Kutools for Exce
Os oes gennych Kutools for Excel, gyda'i offeryn pwerus-Cyfunwch, gallwch gyfuno data mewn colofn, rhes neu amrediad i un gell.
Kutools for Excel : gyda mwy na 300 o ychwanegiadau Excel defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 30 diwrnod. |
Ar ôl gosod Kutools for Excel, gwnewch fel a ganlyn :( Lawrlwythiad Am Ddim Kutools for Excel Nawr! )
1. Dewiswch y golofn ddata rydych chi am ei chyfuno'n un gell.
2. Cliciwch Kutools > Uno a Hollti > Cyfuno Rhesi, Colofnau neu Gelloedd heb Golli Data, gweler y screenshot:
3. Yn y blwch deialog popped out, dewiswch Cyfunwch i mewn i un gell O dan y Cyfuno celloedd dethol yn ôl yr opsiynau canlynol, ac yna nodwch wahanydd i wahanu'r cynnwys unedig, gweler y screenshot:
4. Yna cliciwch Ok or Gwneud cais botwm, a byddwch yn cael y canlyniad canlynol yn ôl yr angen:
![]() |
![]() |
![]() |
Dadlwythwch a threial am ddim Kutools for Excel Nawr!
Demo: Trosi data o'r golofn yn un gell sengl gyda Kutools for Exce
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for Excel Yn cynnig dros 300 o nodweddion uwch i hybu cynhyrchiant ac arbed amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Office Tab Yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!






