Sut i bentyrru colofnau lluosog yn gyflym i un golofn yn Excel?
yn Excel, gall y swyddogaeth Testun i golofnau rannu cell yn golofnau lluosog yn seiliedig ar amffinydd, ond a oes unrhyw ffyrdd i bentyrru colofnau lluosog yn un golofn fel y dangosir isod y screenshot? Yn yr erthygl hon, byddaf yn cyflwyno rhai triciau ar ddatrys y dasg hon yn gyflym.
Staciwch golofnau lluosog yn un gyda fformiwla
Staciwch golofnau lluosog yn un gyda VBA
Staciwch golofnau lluosog yn un gyda Transform Range
Staciwch golofnau lluosog yn un gyda fformiwla
1. Dewiswch yr ystod rydych chi am ei stacio, ac ewch i'r Blwch Enw i roi enw i'r amrediad hwn, a gwasgwch Rhowch allwedd. Gweler y screenshot:
2. Yna dewiswch gell wag rydych chi am ei gosod y canlyniadau, nodwch y fformiwla hon =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1), y wasg hwyadenr allwedd a llusgo trin handlen i lawr nes bod gwall wedi'i arddangos. Gweler y screenshot:
Staciwch golofnau lluosog yn un gyda VBA
Dyma god VBA a all eich helpu chi hefyd.
1. Gwasgwch Alt + F11 allweddi i'w harddangos Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Cliciwch Mewnosod > Modiwlau, pastiwch y cod isod i'r Modiwlau.
VBA: Stack colofnau i un
Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
Rng.Copy
Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3. Gwasgwch F5 allwedd i redeg y cod, mae deialog yn galw allan i ddewis y data ffynhonnell, a chlicio OK, i ddewis cell i osod y canlyniadau. Gweler y screenshot:
4. Cliciwch OK. Nawr mae'r colofnau wedi'u pentyrru mewn un golofn.
Staciwch golofnau lluosog yn un gyda Transform Range
I ymgeisio Kutools ar gyfer Excel'S Trawsnewid Ystod gall cyfleustodau hefyd eich helpu i ddatrys y broblem hon yn gyflym.
Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. | ||
Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel isod:
1. Dewiswch y data colofnau rydych chi'n eu defnyddio, a chlicio Kutools > Ystod > Trawsnewid Ystod. Gweler y screenshot:
2. Yn y Trawsnewid Ystod deialog, gwirio Ystod i golofn sengl opsiwn, a chlicio Ok, yna dewiswch gell i osod canlyniadau. Gweler y screenshot:
3. Cliciwch OK. Nawr mae'r colofnau wedi'u pentyrru i mewn i un golofn sengl.
Staciwch Celloedd Lluosog yn Un Golofn
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer 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...
Mae 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!