VBA文件运行问题，请大神帮忙看下哪的问题好进行修改。

之前有个大神给我写了个vba文件，但是在运行过程中出了点问题，求各位大神再看看，如何修改。
问题：从G列2926行之后，数据就出错了，I,J,K列都等于H列的数据了。2926G这个单元格数值正好是A列下面多出来的G列合并后显示未NA的数据。
文件地址
https://pan.baidu.com/s/1Fku0RjqKTPLDt8uzZpao3A
目标是把A列内容相同的后续几列内容按列合并到相同单元格中。