EXCEL高手vba把A列数字存入数组后如何用msgbox输出来

发布网友 发布时间:2022-04-24 02:18

我来回答

3个回答

热心网友 时间:2022-06-01 11:51



Sub test()Dim a(9) As Integer, i As Integer
Dim total as string
total=""
For i = 1 To 10
a(i - 1) = Range("A" & i)
total=total & " " & a(i-1) & " "
Next
msgbox total
End Sub

追问最好答案了

热心网友 时间: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

来练手的是吧?

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com