求助，如何通过VBA自动生成对方科目

m12y34

由于工作需要经常会接触到不同单位的序时账，需要从序时账中查找到对方科目，因此想通过VBA 自动生成对方科目。如附件所示，A列为凭证日期、B列为凭证序号，D列为科目名称，E为借贷方向（只有借和贷两种）。A列的日期相同且B列的凭证号相同的连续多行作为一笔凭证，每笔凭证（以上提到的连续多行）中与本行E列借贷方向相反（本行如果为“借”，那么方向相反即为“贷”）的科目名称（D列）为对方科目（可能会有多个）
目标是在G列自动生成对方科目，同时用“、”隔开不同科目。
请大神指教，谢谢~

KCFONG

see if help you

Doubles_young

KCFONG 发表于 2017-1-2 15:23
see if help you

您好，看到你的回复感觉受用无穷，非常感谢。但是序时账数据过多的话，会出现运行错误的问题，由于才疏学浅，不理解您的公式，不会修改公式，您看您方便的时候能修改下公式吗？