发布网友 发布时间:2022-04-24 02:18
共3个回答
热心网友 时间:2022-06-01 11:51
追问最好答案了
热心网友 时间:2022-06-01 11:51
Sub test()
Dim a(9) As Integer, i As Integer, t as String
t=""
For i = 1 To 10
a(i - 1) = Range("A" & i)
t = t & Range("A" & i) & IIf(i = 10, "}", ",")
Next
MsgBox t
End Sub
热心网友 时间:2022-06-01 11:51
来练手的是吧?