菜鸟请教各位老师

denvie

表格A

请教下怎么把表A中的B列数据中,如何让EXCEL自动把相同数值自动合并单元格,同时对应后面的数值,具体看图片.

tzDel

左边的不是蛮好吗，为什么要变成右边的？

amazeyeli

楼主不是说了嘛,他是菜鸟,只有菜鸟才会把左边的变成右边的

dajiahaoxinku12

Sub a()
    Set rg = Range("b1")
    For i = 1 To 30
        If Range("b" & i + 1) = Range("b" & i) Then
            Set rg = Union(rg, Range("b" & i + 1))
        Else
        Application.DisplayAlerts = False
        rg.Merge
        Application.DisplayAlerts = True
        Set rg = Range("b" & i + 1)
        End If
    Next
End Sub

天堑小舟

能不合并的单元格,尽量不要合并.

bravekid

可以利用分类汇总来做的，不过附件太大上传不了
lz可以谷歌批量合并首列相同内容的单元格

xujie2812

天堑小舟 发表于 2013-2-16 21:05
能不合并的单元格,尽量不要合并.

能不合并的单元格,尽量不要合并 +10086！