程序出错，不过正常运行，请高手指教。红色这段出现错误

Chip_Kenny

地址列不會多過100列吧,c 就不用改了吧。
a= [a2:axx] 可以為:

1. a = Range("a2:a" & cells(rows.count,1).end(3).row)

复制代码

lrqiang

lrqiang 发表于 2020-7-10 13:48
谢！
可以我把　a = [a2:a103]　改为　a = [a2:a100003]　　　
　　　　　ReDim c(1 To UBound(a), 1 T ...

谢！多谢你的指导。