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

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

2025-02-26 19:37:56

推荐回答（3个）

回答1：

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

回答2：

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

回答3：

来练手的是吧？