发布网友 发布时间:2022-03-08 19:36
共1个回答
热心网友 时间:2022-03-08 21:05
两种方法:
借助第三列单元格:
=A1&B1
用宏来操作。
Range("A" & i) = Range("A" & i) & Range("B" & i)
追答Sub HeBing()
For i = 1 To Range("A65536").End(xlUp).Row
Range("A" & i) = Range("A" & i) & Range("B" & i)
Next
End Sub
打开VB编辑器(可按Alt+F11打开),点击插入,插入模块,将上述代码复制粘贴在模块中,运行该宏(HeBing)。