BSS-ABC采购项目一键汇总版v3.0.zip
2021-2-26 12:52 上传
点击文件名下载附件
255.83 KB, 下载次数: 14
使用道具 举报
cutecpu 发表于 2021-2-26 14:57 arr = Sheets("数据").Range("a5:e" & endrg) 改成 arr = Sheets("数据").Range("a15:e" & endrg)
roseland 发表于 2021-2-26 17:09 修改成arr = Sheets("数据").Range("a15:e" & endrg)后,提示报错:下标越界,如何解决?
cutecpu 发表于 2021-2-26 18:18 代碼裡:endrg - 4 的地方 改成 endrg - 14
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )
GMT+8, 2024-4-27 00:55 , Processed in 0.427410 second(s), 9 queries , Gzip On, Yac On.
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.