每月需要将销售员工信息业绩表汇总，既有新增的员工，也需要将老员工的业绩录入汇总表

ykcbf1100

辉太狼－2014 发表于 2024-8-19 19:48
解压出来的文件，报错不，按楼下的修改吗？

我上传的附件肯定是调试好的。我这里肯定没问题。
如果你实际使用中，工作簿多了，也许会出现其它问题。你可以上传附件看一下。

辉太狼－2014

ykcbf1100 发表于 2024-8-19 19:50
我上传的附件肯定是调试好的。我这里肯定没问题。
如果你实际使用中，工作簿多了，也许会出现其它问题。 ...

我试了下，六月份文件夹放在汇总表所在的文件夹内，实现目标，汇总六月份员工信息业绩表的信息，然后把六月份文件夹剪切出来，放进七月份文件夹，实现新员工信息业绩的汇总，老员工信息业绩的更新（六月份文件夹不剪切出来，六月份及之前的月份业绩会变成双倍的），同时发现一个问题，就是假如七月份，李四的信息业绩表没报，点击汇总后，汇总表李四的数据就没了，实际我需要李四就算没报报表来，就保留之前的数据。

ykcbf1100

辉太狼－2014 发表于 2024-8-19 20:23
我试了下，六月份文件夹放在汇总表所在的文件夹内，实现目标，汇总六月份员工信息业绩表的信息，然后把六 ...

你不能把６月份数据剪切出去啊，你剪切了，那数据肯定没有了。你数据的目录结构都改变了，那代码就不一定起作用了。

辉太狼－2014

ykcbf1100 发表于 2024-8-19 20:29
你不能把６月份数据剪切出去啊，你剪切了，那数据肯定没有了。你数据的目录结构都改变了，那代码就不一定 ...

六月份文件夹不剪切出来，六月份及之前的月份业绩会变成双倍的，我自己弄了个8月份数据，三个文件夹都放一起不剪切出来的话，一汇总6月及之前的每月业绩变成3倍，七月是2倍，有这个问题

ykcbf1100

辉太狼－2014 发表于 2024-8-19 20:38
六月份文件夹不剪切出来，六月份及之前的月份业绩会变成双倍的，我自己弄了个8月份数据，三个文件夹都放 ...

把这句代码d(s) = d(s) + arr(i, j)，改成d(s) =  arr(i, j)
这样就不会重复了。

辉太狼－2014

ykcbf1100 发表于 2024-8-19 07:41
更新一下，个人信息更新为最新信息。

不好意思，因为ＶＢＡ不熟悉，代码在学习，这一句是理解不了，b = [{"b2","d2","f2","h2","j2","b3","e3","j3","b4","f4"}]。

peteryhr

辉太狼－2014 发表于 2024-8-21 16:25
不好意思，因为ＶＢＡ不熟悉，代码在学习，这一句是理解不了，b = [{"b2","d2","f2","h2","j2","b3","e3"," ...

将括号内组成数组，以便在程序中调用。

辉太狼－2014

peteryhr 发表于 2024-8-21 17:57
将括号内组成数组，以便在程序中调用。

s = .Range(b(1)).Value  你好，谢谢你上面的指导，这一句中b(1)是不是数组中的第一个数据，也就是“b2”????