EXCEL如何将一行中相同的数据进行批量合并通过VBA代码
发布网友
发布时间:2022-04-18 21:14
我来回答
共3个回答
热心网友
时间:2022-04-18 22:43
热心网友
时间:2022-04-19 00:01
Sub test()
k=2
j=2
l=Cells(1,Columns.count).end(xltoleft).Column
Do until j>l
If Cells(1,j)<>Cells(1,k) then
Range(Cells(1,k),Cells(1,j-1).Merge
k=j
End if
j=j+1
Loop
End Sub
热心网友
时间:2022-04-19 01:36
听你的描述就比较繁冗埃这个要有文件,还要搞清楚你的意图才能做得出来啊