EXCEL表格如何合并内容相同的行?
3个回答
展开全部
1.excel如何合并相同内容的行
合并内容相同的行常见的三种方法:
一、用数据透视表,最简单方便。如下:
点击数据-数据透视表及数据透视图-完成,把第一列的字段名拉到“行字段”,把第二列的字段名拉到“数据”即可
二、可以使用分类汇总,步骤如下:
1、数据-排序,按代号、名称排序,这样相同的代号名称就会排在一起;
2、数据-分类汇总-汇总字段:代号,汇总方式:求和,求和字段:数量
三、高级筛选
点击数据--筛选--高级筛选--列表区域就是你的数据区域,选中“选择不重复的记录”--确定即可(此法适应于计数,不能累计)
2.excel表格如何将有相同内容的行合并在一起
星期几和上课班级都一样才合并,宏会不会用?打开工作表后按ALT+F11调出VBA窗口,窗口左边工程栏下有个“Microsoft Excel 对象”,选择它点鼠标右键在弹出菜单中选择插入>>模块,下面会出现模块>>模块1,双击模块1,把下面的代码复制到右边空白处,以后你在数据表中按住ALT+F8,在弹出窗口中选择宏"合并"后执行就可以了.代码如下:Sub 合并()fr = [a65536].End(xlUp).Row Range("A1:D" & fr).Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range( _ "D2"), Order2:=xlAscending, Key3:=Range("B2"), Order3:=xlAscending, _ Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:= _ xlTopToBottom, SortMethod:=xlPinYin, DataOption1:=xlSortNormal, _ DataOption2:=xlSortNormal, DataOption3:=xlSortNormalFor i = fr To 2 Step -1If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 4) = Cells(i - 1, 4) ThenIf Cells(i, 3) = Cells(i - 1, 3) ThenCells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)Rows(i & ":" & i).DeleteElseCells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)Cells(i - 1, 3) = Cells(i - 1, 3) & "/" & Cells(i, 3)Rows(i & ":" & i).DeleteEnd IfEnd IfNext iEnd Sub以上代码达到下面的效果:(原数据)星期几 节次 上课老师 上课班级周二 第1,2节 史风华 06信息1班周一 第1,2节 史风华 06信息1班周一 第1,2节 龙安利 06信息2班周一 第3,4节 史风华 06信息2班周一 第3,4节 龙安利 06信息1班周二 第3,4节 史风华 06信息1班(执行后)星期几 节次 上课老师 上课班级周二 第1,2节/第3,4节 史风华 06信息1班周一 第1,2节/第3,4节 史风华/龙安利 06信息1班周一 第1,2节/第3,4节 龙安利/史风华 06信息2班。
3.如何将一张excel表格中不同行的内容合并到一起
在第10行输入=A1&A2&A3。.&A9(全部行要写进来)
如果行有多个单元格内容,通用的是:
假设第1、2行内容需要合并。在第3行第一个格输入=A1&A2,回车,然后把公式向右拉。
如果不想向右拉,可以先把第1、2行转成列:选中第1行内容(不能全选整行)---复制---选定空列中的第一格---选择性粘贴----转置。第2行同样操作。假设转置后在第I、J列,在第K列输入=I1&J1,回车,双击填充公式。把第K列转换成文本后再转置成行。
如果需要合并的行太长,第二种方法比较方便。不明白可以再问。
4.excel如何将相同大项的具体内容合并
首先排序一下:鼠标点中最左侧行号2,按Ctrl+Shift+向下的箭头,选中所有有数据的行,排序,自定义排序,主要关键字选“列A”,确定。即可将所有相同的姓名排序在一起。
在G2单元格输入公式=SUBSTITUTE(IFERROR(INDEX(0&A$2:A$10000,SMALL(IF(MATCH(0&A$2:A$10000,0&A$2:A$10000,)=ROW(A$2:A$10000)-1,ROW(A$2:A$10000)-1,5^5),ROW(A1)))&"",""),"0","")
数组公式,按CTRL+SHIFT+ENTER结束公式,使公式前后出现大括号{},下拉到出现空白单元格止。
在H2单元格输入公式=IFERROR(MID(SUBSTITUTE(PHOIC(OFFSET(A$1:B$1,MATCH(G2,A$1:A$10000,)-1,,COUNTIF(A:A,G2))),G2,"+"),2,10000),"")
下拉公式到空白单元格出现为止。(两个公式帮你预设了1万行,如不够,可自行修改!)
如图:
5.excel表格如何将有相同内容的行合并在一起
星期几和上课班级都一样才合并,宏会不会用?打开工作表后按ALT+F11调出VBA窗口,窗口左边工程栏下有个“Microsoft Excel 对象”,选择它点鼠标右键在弹出菜单中选择插入>>;模块,下面会出现模块>>;模块1,双击模块1,把下面的代码复制到右边空白处,以后你在数据表中按住ALT+F8,在弹出窗口中选择宏"合并"后执行就可以了.代码如下:
Sub 合并()
fr = [a65536].End(xlUp).Row
Range("A1:D" & fr).Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range( _
"D2"), Order2:=xlAscending, Key3:=Range("B2"), Order3:=xlAscending, _
Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom, SortMethod:=xlPinYin, DataOption1:=xlSortNormal, _
DataOption2:=xlSortNormal, DataOption3:=xlSortNormal
For i = fr To 2 Step -1
If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 4) = Cells(i - 1, 4) Then
If Cells(i, 3) = Cells(i - 1, 3) Then
Cells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)
Rows(i & ":" & i).Delete
Else
Cells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)
Cells(i - 1, 3) = Cells(i - 1, 3) & "/" & Cells(i, 3)
Rows(i & ":" & i).Delete
End If
End If
Next i
End Sub
以上代码达到下面的效果:
(原数据)
星期几 节次 上课老师 上课班级
周二 第1,2节 史风华 06信息1班
周一 第1,2节 史风华 06信息1班
周一 第1,2节 龙安利 06信息2班
周一 第3,4节 史风华 06信息2班
周一 第3,4节 龙安利 06信息1班
周二 第3,4节 史风华 06信息1班
(执行后)
星期几 节次 上课老师 上课班级
周二 第1,2节/第3,4节 史风华 06信息1班
周一 第1,2节/第3,4节 史风华/龙安利 06信息1班
周一 第1,2节/第3,4节 龙安利/史风华 06信息2班
合并内容相同的行常见的三种方法:
一、用数据透视表,最简单方便。如下:
点击数据-数据透视表及数据透视图-完成,把第一列的字段名拉到“行字段”,把第二列的字段名拉到“数据”即可
二、可以使用分类汇总,步骤如下:
1、数据-排序,按代号、名称排序,这样相同的代号名称就会排在一起;
2、数据-分类汇总-汇总字段:代号,汇总方式:求和,求和字段:数量
三、高级筛选
点击数据--筛选--高级筛选--列表区域就是你的数据区域,选中“选择不重复的记录”--确定即可(此法适应于计数,不能累计)
2.excel表格如何将有相同内容的行合并在一起
星期几和上课班级都一样才合并,宏会不会用?打开工作表后按ALT+F11调出VBA窗口,窗口左边工程栏下有个“Microsoft Excel 对象”,选择它点鼠标右键在弹出菜单中选择插入>>模块,下面会出现模块>>模块1,双击模块1,把下面的代码复制到右边空白处,以后你在数据表中按住ALT+F8,在弹出窗口中选择宏"合并"后执行就可以了.代码如下:Sub 合并()fr = [a65536].End(xlUp).Row Range("A1:D" & fr).Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range( _ "D2"), Order2:=xlAscending, Key3:=Range("B2"), Order3:=xlAscending, _ Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:= _ xlTopToBottom, SortMethod:=xlPinYin, DataOption1:=xlSortNormal, _ DataOption2:=xlSortNormal, DataOption3:=xlSortNormalFor i = fr To 2 Step -1If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 4) = Cells(i - 1, 4) ThenIf Cells(i, 3) = Cells(i - 1, 3) ThenCells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)Rows(i & ":" & i).DeleteElseCells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)Cells(i - 1, 3) = Cells(i - 1, 3) & "/" & Cells(i, 3)Rows(i & ":" & i).DeleteEnd IfEnd IfNext iEnd Sub以上代码达到下面的效果:(原数据)星期几 节次 上课老师 上课班级周二 第1,2节 史风华 06信息1班周一 第1,2节 史风华 06信息1班周一 第1,2节 龙安利 06信息2班周一 第3,4节 史风华 06信息2班周一 第3,4节 龙安利 06信息1班周二 第3,4节 史风华 06信息1班(执行后)星期几 节次 上课老师 上课班级周二 第1,2节/第3,4节 史风华 06信息1班周一 第1,2节/第3,4节 史风华/龙安利 06信息1班周一 第1,2节/第3,4节 龙安利/史风华 06信息2班。
3.如何将一张excel表格中不同行的内容合并到一起
在第10行输入=A1&A2&A3。.&A9(全部行要写进来)
如果行有多个单元格内容,通用的是:
假设第1、2行内容需要合并。在第3行第一个格输入=A1&A2,回车,然后把公式向右拉。
如果不想向右拉,可以先把第1、2行转成列:选中第1行内容(不能全选整行)---复制---选定空列中的第一格---选择性粘贴----转置。第2行同样操作。假设转置后在第I、J列,在第K列输入=I1&J1,回车,双击填充公式。把第K列转换成文本后再转置成行。
如果需要合并的行太长,第二种方法比较方便。不明白可以再问。
4.excel如何将相同大项的具体内容合并
首先排序一下:鼠标点中最左侧行号2,按Ctrl+Shift+向下的箭头,选中所有有数据的行,排序,自定义排序,主要关键字选“列A”,确定。即可将所有相同的姓名排序在一起。
在G2单元格输入公式=SUBSTITUTE(IFERROR(INDEX(0&A$2:A$10000,SMALL(IF(MATCH(0&A$2:A$10000,0&A$2:A$10000,)=ROW(A$2:A$10000)-1,ROW(A$2:A$10000)-1,5^5),ROW(A1)))&"",""),"0","")
数组公式,按CTRL+SHIFT+ENTER结束公式,使公式前后出现大括号{},下拉到出现空白单元格止。
在H2单元格输入公式=IFERROR(MID(SUBSTITUTE(PHOIC(OFFSET(A$1:B$1,MATCH(G2,A$1:A$10000,)-1,,COUNTIF(A:A,G2))),G2,"+"),2,10000),"")
下拉公式到空白单元格出现为止。(两个公式帮你预设了1万行,如不够,可自行修改!)
如图:
5.excel表格如何将有相同内容的行合并在一起
星期几和上课班级都一样才合并,宏会不会用?打开工作表后按ALT+F11调出VBA窗口,窗口左边工程栏下有个“Microsoft Excel 对象”,选择它点鼠标右键在弹出菜单中选择插入>>;模块,下面会出现模块>>;模块1,双击模块1,把下面的代码复制到右边空白处,以后你在数据表中按住ALT+F8,在弹出窗口中选择宏"合并"后执行就可以了.代码如下:
Sub 合并()
fr = [a65536].End(xlUp).Row
Range("A1:D" & fr).Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range( _
"D2"), Order2:=xlAscending, Key3:=Range("B2"), Order3:=xlAscending, _
Header:=xlYes, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom, SortMethod:=xlPinYin, DataOption1:=xlSortNormal, _
DataOption2:=xlSortNormal, DataOption3:=xlSortNormal
For i = fr To 2 Step -1
If Cells(i, 1) = Cells(i - 1, 1) And Cells(i, 4) = Cells(i - 1, 4) Then
If Cells(i, 3) = Cells(i - 1, 3) Then
Cells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)
Rows(i & ":" & i).Delete
Else
Cells(i - 1, 2) = Cells(i - 1, 2) & "/" & Cells(i, 2)
Cells(i - 1, 3) = Cells(i - 1, 3) & "/" & Cells(i, 3)
Rows(i & ":" & i).Delete
End If
End If
Next i
End Sub
以上代码达到下面的效果:
(原数据)
星期几 节次 上课老师 上课班级
周二 第1,2节 史风华 06信息1班
周一 第1,2节 史风华 06信息1班
周一 第1,2节 龙安利 06信息2班
周一 第3,4节 史风华 06信息2班
周一 第3,4节 龙安利 06信息1班
周二 第3,4节 史风华 06信息1班
(执行后)
星期几 节次 上课老师 上课班级
周二 第1,2节/第3,4节 史风华 06信息1班
周一 第1,2节/第3,4节 史风华/龙安利 06信息1班
周一 第1,2节/第3,4节 龙安利/史风华 06信息2班
展开全部
要合并相同内容的行,在 Excel 中可以使用以下步骤:
1. 根据内容排序:首先,根据您要合并的列的内容进行排序,以确保具有相同内容的行相邻排列。选择要排序的列,然后在Excel菜单栏的"数据"选项卡中,点击"排序"按钮。按照您的需求选择升序或降序排序。
2. 添加合并列:如果您的表格中还没有合并列,请在表格中添加一个新的列,用于标记要合并的行。在合并列中,对于第一个相同内容的行,将标记设为1;对于后续的相同内容的行,将标记设为0。
3. 使用公式合并内容:在一个新的单元格中,使用 CONCATENATE 或 TEXTJOIN 函数以及 IF 函数进行合并,具体取决于您的 Excel 版本。假设您要合并的内容在 A 列,而合并结果将在 B 列。在 B 列的第一个单元格中,输入以下公式:
- 对于 CONCATENATE 函数:`=IF(A2=A1, CONCATENATE(B1, ", ", A2), A2)`
- 对于 TEXTJOIN 函数(适用于 Excel 2016 及更高版本):`=IF(A2=A1, TEXTJOIN(", ", TRUE, B1, A2), A2)`
这个公式将检查前一行与当前行是否相同,如果相同,则将前一行合并的内容与当前行的内容以逗号分隔连接在一起;如果不同,则直接显示当前行的内容。将这个公式应用到所有需要合并的行。
4. 填充公式并删除重复行:将公式填充到整个合并列中。然后,选中整个表格(包括合并列),在Excel菜单栏的"数据"选项卡中,点击"删除重复项"按钮。在弹出的对话框中,确保只选择合并列,并点击"确定"按钮。
完成上述步骤后,具有相同内容的行将被合并为一行,并且其他重复行将被删除。请注意,在进行任何操作之前,务必备份您的数据以防意外损失。
1. 根据内容排序:首先,根据您要合并的列的内容进行排序,以确保具有相同内容的行相邻排列。选择要排序的列,然后在Excel菜单栏的"数据"选项卡中,点击"排序"按钮。按照您的需求选择升序或降序排序。
2. 添加合并列:如果您的表格中还没有合并列,请在表格中添加一个新的列,用于标记要合并的行。在合并列中,对于第一个相同内容的行,将标记设为1;对于后续的相同内容的行,将标记设为0。
3. 使用公式合并内容:在一个新的单元格中,使用 CONCATENATE 或 TEXTJOIN 函数以及 IF 函数进行合并,具体取决于您的 Excel 版本。假设您要合并的内容在 A 列,而合并结果将在 B 列。在 B 列的第一个单元格中,输入以下公式:
- 对于 CONCATENATE 函数:`=IF(A2=A1, CONCATENATE(B1, ", ", A2), A2)`
- 对于 TEXTJOIN 函数(适用于 Excel 2016 及更高版本):`=IF(A2=A1, TEXTJOIN(", ", TRUE, B1, A2), A2)`
这个公式将检查前一行与当前行是否相同,如果相同,则将前一行合并的内容与当前行的内容以逗号分隔连接在一起;如果不同,则直接显示当前行的内容。将这个公式应用到所有需要合并的行。
4. 填充公式并删除重复行:将公式填充到整个合并列中。然后,选中整个表格(包括合并列),在Excel菜单栏的"数据"选项卡中,点击"删除重复项"按钮。在弹出的对话框中,确保只选择合并列,并点击"确定"按钮。
完成上述步骤后,具有相同内容的行将被合并为一行,并且其他重复行将被删除。请注意,在进行任何操作之前,务必备份您的数据以防意外损失。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
高级筛选--数据--筛选--高级筛选--列表区域就是你的数据区域,选中“选择不重复的记录”,如果你想把结果复制到其它地方,可以把“将筛选结果复制到其它位置”勾上,在“复制到”里填上一个空白单元格如"G1"--确定即可
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询