ник: Анатолий (Киев)
Вот проверил, всё работает. Проверьте у себя. У вас какой Акс?
Sub aaa()
Dim arr
arr = Split("111;222", ";")
Call bbb(arr(0), arr(1))
Call ccc(arr)
End Sub
Sub bbb(ParamArray arg())
MsgBox arg(0)
End Sub
Sub ccc(arg)
MsgBox arg(1)
End Sub
|
Может засада в Node.Key? Может его значение нужно присвоить строковой переменной, а затем ее передавать процедуре?