Conas sraitheanna a chomhtháthú i gcill amháin bunaithe ar ghrúpa in Excel?
Seo raon dhá cholún, is é ceann liosta na ranganna, agus an ceann eile liosta ainmneacha na mac léinn. Mar a fheiceann tú, tá roinnt mac léinn sa rang céanna, níl cuid acu. Anois is mian liom na mic léinn sa rang céanna a chur le chéile i gcill amháin mar atá faoi bhun an scáileáin a thaispeántar, conas is féidir liom é a láimhseáil go tapa in Excel?
Grúpáil agus comhchuibhiú le foirmlí agus feidhm Scagaire
Grúpa agus comhchuibhiú le cód VBA
Grúpáil agus comhchruinniú le Advanced Combine Rows
Grúpáil agus comhchuibhiú le foirmlí agus feidhm Scagaire
In Excel, is féidir leat foirmlí a chur i bhfeidhm ar shraitheanna comhtháthaithe bunaithe ar cholún amháin, ansin an fheidhm Scagaire a úsáid chun an toradh a thaispeáint amháin.
nótaí: Caithfidh tú do chuid sonraí a shórtáil de réir an ranga sula leanfaidh tú na céimeanna.
1. I gcill bhán in aice leis an raon sonraí, mar shampla, C13, clóscríobh an fhoirmle seo =IF(A13=A12,C12&", "&B13,B13), brúigh Enter eochair agus líon isteach an fhoirmle do chealla a bhfuil láimhseáil líonta tarraingthe acu.
San fhoirmle, is é A13 na chéad sonraí sa cholún “Aicme”, is é B13 na chéad sonraí sa cholún “Ainm”, “,” an deighilteoir chun ábhar comhthráthach a theorannú.
2. Ansin sa chéad cholún eile, D13, clóscríobh an fhoirmle seo =IF(A13<>A14,"Last","") , agus tarraing láimhseáil líonta síos chun an fhoirmle a chur i bhfeidhm ar chealla a theastaíonn uait.
3. Anois roghnaigh an raon sonraí go léir lena n-áirítear foirmlí agus cliceáil Dáta > Filter a chur Filter icons leis na sonraí.
4. Cliceáil ar an Filter icon sa cheanntásc deireanach foirmle, seiceáil Last bosca seiceála amháin ón liosta anuas, agus cliceáil OK.
Anois taispeántar an toradh mar atá thíos, is féidir leat an colún cúntóra deireanach a bhaint mura bhfuil sé uait riamh.
Grúpa agus comhchuibhiú le cód VBA
Seo cód VBA atá in ann an post seo a láimhseáil freisin.
1. Brúigh Alt + F11 eochracha chun an Microsoft Visual Basic for Applications fhuinneog.
2. Ansin san fhuinneog, cliceáil Tools > References a chumasú References dialóg, agus seiceáil Microsoft Scripting Runtime. Féach an pictiúr:
3. cliceáil OK, agus cliceáil Insert > Module i bhfuinneog VBA, agus cóipeáil agus greamaigh faoi bhun chód VBA chuig an Module script. Féach an pictiúr:
VBA: Sraitheanna concatenate i gcill amháin bunaithe ar ghrúpa
Sub ConcatenateCellsIfSameValues()
'UpdatebyExtendoffice20180201
Dim I As Long
Dim J As Long
Dim xRg As Range
Dim xRgKey As Range
Dim xRgVal As Range
Dim xStr As String
Dim xDic As New Dictionary
On Error Resume Next
Set xRg = Application.InputBox("Select data range", "KuTools for Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRgKey = Application.InputBox("Select key column", "KuTools for Excel", xRg.Columns(1).Address, , , , , 8)
If xRgKey Is Nothing Then
MsgBox "Key column cannot be empty", vbInformation, "KuTools for Excel"
End If
Set xRgVal = xRg(1).Offset(, 1).Resize(xRg.Rows.Count, xRg.Columns.Count - 1)
For I = 1 To xRgKey.Count
If I > xRgKey.Count Then Exit For
xStr = ""
For J = 1 To xRgVal.Columns.Count
xStr = xStr & " " & xRgVal(I, J)
Next
If xDic.Exists(xRgKey(I).Text) Then
xDic(xRgKey(I).Text) = xDic(xRgKey(I).Text) & xStr
xRgKey(I).EntireRow.Delete
I = I - 1
Else
xDic.Add xRgKey(I).Text, xStr
End If
Next
For I = 1 To xRgVal.Count
xRgVal(I).Value = xDic(xRgKey(I).Text)
Next
End Sub
4. Brúigh F5 eochair, agus roghnaigh an raon sonraí a úsáideann tú sa dialóg popping.
5. cliceáil OK chun an colún eochair a theastaíonn uait a ghrúpáil a roghnú bunaithe ar.
6. cliceáil OK, anois taispeántar an toradh mar atá thíos:
Grúpáil agus comhchruinniú le Advanced Combine Rows
Seo fóntais i Kutools le haghaidh Excel, Advanced Combine Rónna, ar féidir leo sraitheanna a chur le chéile nó ríomhanna a dhéanamh bunaithe ar eochaircholún in Excel.
Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. |
Tar éis a shuiteáil Kutools for Excel, déan mar atá thíos le do thoil:Download Kutools Íoslódáil saor in aisce do Excel Anois!)
1. Roghnaigh an raon sonraí a úsáideann tú agus cliceáil Kutools > Cumaisc & Scoilt > Sraitheanna Comhcheangail Casta.
2. Sa Advanced Combine Rows fhuinneog, roghnaigh an colún ar mhaith leat sraitheanna a chur le chéile bunaithe air, agus cliceáil Primary Key chun é a shocrú mar eochaircholún.
3. Roghnaigh an colún a theastaíonn uait a chur le chéile, cliceáil Combine, agus roghnaigh teorantóir amháin a úsáideann tú chun an t-ábhar comhcheangailte a scaradh.
4. cliceáil Ok. Taispeántar an toradh mar seo:
nótaí: Sula gcuirfidh tú an fóntais i bhfeidhm, b’fhearr duit cóip de na sonraí bunaidh a bheith agat.
Demo
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!