1、“最后一次循环会提取第一个文件名”这句话我没看懂,dir检索文件的顺序并不能事先确定,到底哪个才是第一个检索到的文件由系统说了算,编程人并不能显现得知。不知道这是不是你错误的原因?为了确认检索顺序,我特意去写了一段检索代码,我发现检索的顺序大致是按照文本排序的顺序排列的,但又跟资源管理器里面看到的排序结果不同。相对来说dir检索的结果与文本排列顺序是相同的,但资源管理器里的文件排序就比较复杂了,我特意把排列方式修改成”名称“,也不能得到与dir完全相同的顺序,总有少数几个例外;
2、Let J=ActiveSheet.Range("c2").value这句写得很罗嗦,Let是不需要的,给变量赋值一般不需要Let。
2、Let J=ActiveSheet.Range("c2").value这句写得很罗嗦,Let是不需要的,给变量赋值一般不需要Let。