类型不匹配？本人新手，请高手们帮忙看看

hzybit 发布于 2013-03-22 10:27， 385 次点击

Dim ARRY(1 To 10) As Integer
For i = 1 To 10
ARRY(i) = Cells(TMP, i - 1)
Next
Call dianpu(ARRY)’红字报错
Private Sub dianpu(ByVal ARRY As Integer)
End Sub

1 回复

xbj_hyml2013-03-22 17:04

Private Sub dianpu(ByRef ARRY() As Integer)
End Sub
---试试..