如何在excel的同一列中,相同的相邻单元格自动进行合并,追加分数!
比如,我把一列中的内容先进行排序AABBBCDD然后,用什么方法,把AABBBDD自动的合成一个大单元格,谢谢大家了,请说的具体一点,切实有效的,一定追加分数!!...
比如,我把一列中的内容先进行排序
A
A
B
B
B
C
D
D
然后,用什么方法,把AA BBB DD自动的合成一个大单元格,谢谢大家了,请说的具体一点,切实有效的,一定追加分数!! 展开
A
A
B
B
B
C
D
D
然后,用什么方法,把AA BBB DD自动的合成一个大单元格,谢谢大家了,请说的具体一点,切实有效的,一定追加分数!! 展开
3个回答
展开全部
excel没那么智能能自动合并,要合并单元格只要选择相应的单元格合并即可,需要手动自己点击合并。
a-b合并再d单独合并。
a-b合并再d单独合并。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
右键SHEET1复制代码
Sub MergeSameCells()
Dim lRow As Integer
Application.DisplayAlerts = False
With ActiveSheet
lRow = .Range("A65536").End(xlUp).Row
For i = lRow To 2 Step -1
If .Cells(i, 1).Value = .Cells(i - 1, 1).Value Then
.Range(.Cells(i - 1, 1), .Cells(i, 1)).Merge
End If
Next
End With
Application.DisplayAlerts = True
End Sub
关闭窗口,按ALT+F8,执行!
Sub MergeSameCells()
Dim lRow As Integer
Application.DisplayAlerts = False
With ActiveSheet
lRow = .Range("A65536").End(xlUp).Row
For i = lRow To 2 Step -1
If .Cells(i, 1).Value = .Cells(i - 1, 1).Value Then
.Range(.Cells(i - 1, 1), .Cells(i, 1)).Merge
End If
Next
End With
Application.DisplayAlerts = True
End Sub
关闭窗口,按ALT+F8,执行!
更多追问追答
追问
请问右键sheet1是什么意思?我对excel比较白痴。。。麻烦具体一点,谢谢了
追答
打开EXCEL,右键SHEET(就是你的表名)
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询