[已解决]请问，为什么运行程序没有反映？

wgxfhi11

请问，为什么运行程序没有反映？谢谢！

最佳答案

月排行榜 / 总排行榜

327718098

2017-6-1 07:14

For i = 4 To UBound(ARR) ARR的最大上标为3 所以for next 过程直接跳过了

跳转到最佳答案楼层

砂海

没有细看 ,

在 你认为 该有反应的 那句前 ,
加一句 Stop , 停在这里 ,再查看 变量的值 .

327718098

For i = 4 To UBound(ARR) ARR的最大上标为3 所以for next 过程直接跳过了

wgxfhi11

那就问要如何更改，谢谢！直接改成3吗？

wgxfhi11

327718098 发表于 2017-6-1 07:14
For i = 4 To UBound(ARR) ARR的最大上标为3 所以for next 过程直接跳过了

已经改成3了，还是无法运行，请指教！谢谢！

327718098

wgxfhi11 发表于 2017-6-1 09:10
已经改成3了，还是无法运行，请指教！谢谢！

把ARR赋值改为 ARR = Intersect(Sheet1.UsedRange, Range("ba:be"))就可以运行，就是不知道是不是你要的结果

wgxfhi11

327718098 发表于 2017-6-1 09:49
把ARR赋值改为 ARR = Intersect(Sheet1.UsedRange, Range("ba:be"))就可以运行，就是不知道是不是你要的 ...

谢谢，大大！{:29:}