如图,用什么公式能实现合并
公式为:
=TEXTJOIN(",",,A$1:A1)
如图所示:
b2=B1&A1&","&A2下拉
VBA
Sub aa()
Dim i
[b2] = [a1] & "," & [a2]
For i = 2 To Range("a65536").End(xlUp).Row-1
Cells(i + 1, "b") = Cells(i, "b") & "," & Cells(i + 1, "a")
Next
End Sub