[已解决]程序运行不下去了，请大神们帮忙

追逐梦

校准表.rar (362.12 KB, 下载次数: 8)

2016-10-24 16:32 上传

点击文件名下载附件
附件的程序老出错，改来改去都不行，求大神帮忙
出错部分是给对序号从1开始编号的，上面的程序运行没有问题，怎么到了下面的SUB就出问题了，为什么呢？

最佳答案

月排行榜 / 总排行榜

苏子龙

2016-10-25 10:03

楼上已给答案，见附件

跳转到最佳答案楼层

fjmxwrs

1. n = .Range("a65536").End(xlUp).Row - 3

复制代码

追逐梦

fjmxwrs 发表于 2016-10-24 22:39

也运行不下去啊，下面的代码要怎么改

苏子龙

楼上已给答案，见附件

追逐梦

谢谢版主和苏子龙，苏子龙传的附件让我能更好的对比自己的代码还有哪里不当，所以设置苏子龙的为最佳答案！原因 是我水平太水了，需要参照代码。。。。