
vba 复制数组
VBA中已知数组ARR1,现在定义一个数组,怎么让ARR2中的数等于ARR1的数?也就是说把ARR1的值全复制给ARR2,求代码,谢谢...
VBA中已知数组ARR1,现在定义一个数组,怎么让ARR2中的数等于ARR1的数?也就是说把ARR1的值全复制给ARR2,求代码,谢谢
展开
1个回答
展开全部
如果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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询