Skip i'r prif gynnwys

Sut i rannu gwerthoedd sydd wedi'u gwahanu â choma yn rhesi neu golofnau yn Excel?

Mewn rhai achosion, efallai y bydd angen i chi rannu gwerthoedd sydd wedi'u gwahanu â choma o gelloedd dethol yn rhesi neu golofnau. Yma byddwn yn cyflwyno tri dull i chi ddatrys y broblem hon yn fanwl.

Rhannwch werthoedd wedi'u gwahanu gan goma yn golofnau gyda swyddogaeth Testun i Golofnau
Rhannwch werthoedd wedi'u gwahanu gan goma yn rhesi â chod VBA
Rhannwch werthoedd wedi'u gwahanu gan goma yn gyflym yn rhesi neu golofnau gyda Kutools ar gyfer Excel


Rhannwch werthoedd wedi'u gwahanu gan goma yn golofnau gyda swyddogaeth Testun i Golofnau

Gallwch gymhwyso'r swyddogaeth Testun i Golofnau i rannu gwerthoedd sydd wedi'u gwahanu â choma o gelloedd dethol yn golofnau. Gwnewch fel a ganlyn.

1. Dewiswch yr ystod o gelloedd rydych chi am rannu gwerthoedd yn golofnau, ac yna cliciwch Dyddiad > Testun i Colofnau. Gweler y screenshot:

2. Yn y cyntaf Trosi Deunydd Testun i Colofnau blwch deialog, dewiswch y Wedi'i ddosbarthu opsiwn, ac yna cliciwch ar y Digwyddiadau botwm.

3. Yn yr ail Trosi Deunydd Testun i Colofnau blwch deialog, gwiriwch y atalnod blwch yn y Amffinyddion adran, a chliciwch ar y Digwyddiadau botwm.

4. Yn yr olaf Trosi Deunydd Testun i Colofnau blwch deialog, dewiswch gell ar gyfer lleoli'r gwerthoedd hollti yn y Cyrchfan blwch, ac yn olaf cliciwch y Gorffen botwm. Gweler y screenshot:

Nawr mae'r holl werthoedd mewn celloedd dethol a gafodd eu gwahanu gan atalnodau wedi'u rhannu i wahanol golofnau fel y dangosir screenshot bellow.

Fel rheol, mae'r Testun i golofnau nodwedd yn rhannu celloedd yn golofnau ar wahân yn unig, os ydych chi am rannu celloedd yn rhesi, sut allwch chi wneud?
Yma, mae'r Kutools ar gyfer Excel's Celloedd Hollt gall cyfleustodau eich helpu i rannu celloedd yn gyflym yn ôl gofod, coma, llinell newydd, gwahanyddion eraill neu led penodol yn nid yn unig rhesi wedi'u gwahanu, ond colofnau yn Excel. Dadlwythwch Kutools ar gyfer Excel nawr! (Llwybr am ddim 30 diwrnod)


Rhannwch werthoedd wedi'u gwahanu gan goma yn rhesi â chod VBA

Ar gyfer rhannu gwerthoedd sydd wedi'u gwahanu â choma yn rhesi, gallwch gymhwyso'r cod VBA canlynol.

1. Gwasgwch y Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch a gludwch y cod VBA isod i mewn i ffenestr y Modiwl.

Cod VBA: Rhannwch werthoedd wedi'u gwahanu gan goma yn rhesi

Sub SplitAll()
	Dim xRg As Range
	Dim xRg1 As Range
	Dim xCell As Range
	Dim I As Long
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim xRet As Variant
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Columns.Count > 1 Then
			MsgBox "You can't select multiple columns", , "Kutools for Excel"
			Exit Sub
			End If
			Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
			Set xRg1 = xRg1.Range("A1")
			If xRg1 Is Nothing Then Exit Sub
				xUpdate = Application.ScreenUpdating
				Application.ScreenUpdating = False
				For Each xCell In xRg
					xRet = Split(xCell.Value, ",")
					xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
					I = I + UBound(xRet, 1) + 1
				Next
				Application.ScreenUpdating = xUpdate
			End Sub

3. Gwasgwch y F5 allwedd i redeg y cod. Yn y popping up Kutools ar gyfer Excel blwch deialog, dewiswch y celloedd rydych chi am eu rhannu, ac yna cliciwch ar y OK botwm.

4. Yn yr ail popio i fyny Kutools ar gyfer Excel blwch deialog, dewiswch gell ar gyfer lleoli'r gwerthoedd hollti, yna cliciwch OK.

Yna gallwch weld bod y gwerthoedd sydd wedi'u gwahanu gan goma mewn celloedd dethol yn cael eu rhannu'n resi fel y dangosir screenshot bellow.


Rhannwch werthoedd wedi'u gwahanu gan goma yn gyflym yn rhesi neu golofnau gyda Kutools ar gyfer Excel

The Celloedd Hollt cyfleustodau Kutools ar gyfer Excel gall eich helpu i rannu gwerthoedd sydd wedi'u gwahanu â choma yn rhesi neu golofnau yn hawdd.

1. Dewiswch y celloedd y mae angen i chi eu rhannu, ac yna cliciwch Kutools > Uno a Hollti > Celloedd Hollt. Gweler y screenshot:

2. Yn y Celloedd Hollt blwch deialog, dewiswch Hollti i Rhesi or Hollti i Golofnau yn y math adran yn ôl yr angen. Ac yn y Nodwch wahanydd adran, dewiswch y Arall opsiwn, rhowch y symbol coma yn y blwch testun, ac yna cliciwch ar y OK botwm. Gweler y screenshot:

3. Ac yna bydd blwch prydlon arall yn popio allan i'ch atgoffa i ddewis cell i allbwn y canlyniad, gweler y screenshot:

4. Cliciwch OK botwm, gallwch weld y canlyniadau fel isod sgrinluniau a ddangosir.

Hollti i Golofnau

Hollti i Rhesi

  Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.


Demo: Rhannwch werthoedd gwahanu coma yn gyflym yn rhesi neu golofnau gyda Kutools ar gyfer Excel

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

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...

Disgrifiad


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!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
A jak zmienić kod żeby nie pytał o ustawienie się w A1 i potem aby wynik był np też od A1 w dół
This comment was minimized by the moderator on the site
Hi Bartek,
You mean don't want to pop up the second dialog to select the target cell, and want to specify the target cell in the code directly?
If so, you need to change the following lines.
For example, you need to start outputting results from B1 and automatically fill down.
Please change this line:
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
to
Set xRg1 = Application.Range("B2")
And then remove the next line:
Set xRg1 = xRg1.Range("A1")
This comment was minimized by the moderator on the site
i still cant upload my csv into 365
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example
id name add
1 Ratnesh myAdd
2,Yog,myAdd
we will apply in the 2nd record it will split record like 1st records,
Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example

id name add

1 Ratnesh myAdd

2,Yog,myAdd


we will apply in the 2nd record it will split record like 1st records,


Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Thanks it helped :)
This comment was minimized by the moderator on the site
This is amazing, thanks for making it free and easy to use!
This comment was minimized by the moderator on the site
Thank you!
This comment was minimized by the moderator on the site
Alternately for separating into rows, use the text to column steps and then copy & paste ->transpose to turn the columns into rows.
This comment was minimized by the moderator on the site
Thanks Jake! This is what I was looking for. :)
This comment was minimized by the moderator on the site
Good one, the utility help me a lot. Thanks for that... :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations