VBA中已知数组ARR1,现在定义一个数组,怎么让ARR2中的数等于ARR1的数?也就是说把ARR1的值全复制给ARR2,求代码,谢谢
如果ARR2定义成动态数组,则直接ARR2=ARR1就行,如果ARR2不是动态数组,则只有当ARR2中的元素个数与ARR1中一样时才能完成要求,语句如下
For i = LBound(ARR1) To UBound(ARR1)
ARR2(i) = ARR1(i)
Next i
For i = LBound(ARR1) To UBound(ARR1)
ARR2(i) = ARR1(i)
Next i
温馨提示:答案为网友推荐,仅供参考