[已解决]求教组合代码，谢谢

chensir

请教，如何用代码把A列和B列数据组合起来。例如D列

最佳答案

月排行榜 / 总排行榜

wayy

2014-11-26 09:56

1. Sub aa()
   
2. Dim i As Long
   
3. For i = 2 To [a65536].End(xlUp).Row
   
4.   Cells(i, 4) = Cells(i, 1) & Cells(i, 2)
   
5. Next
   
6. End Sub

复制代码

跳转到最佳答案楼层

wayy

1. Sub aa()
   
2. Dim i As Long
   
3. For i = 2 To [a65536].End(xlUp).Row
   
4.   Cells(i, 4) = Cells(i, 1) & Cells(i, 2)
   
5. Next
   
6. End Sub

复制代码

上清宫主

i% = Cells(65536, 1).End(3).Row
[c2].Resize(i - 1) = Evaluate("a2:a" & i & "&b2:b" & i)