Excel 多重串联-VBA

需要你的帮助-

能够对所选单元格进行连接，使其在单元格中具有值-

如何将相同的应用于列表的其余部分

谢谢， MK

---

您指的是哪个“列表”？您的

i

变量仅被分配给。它永远不会被使用。

Private Sub Trial_1_Click()
Dim CC As Range
Dim i As Integer
Dim TT As String
i = 0
TT = ""
For Each CC In Selection
If i = 0 Then
i = 1
End If
TT = TT & CC.Value & ""
Next
TT = Left(TT, Len(TT))
Range("P2").Value = TT
End Sub