根据发票明细生成用友T3凭证导入模板

GavinQiu

各位大神
能否将增值税发票明细，通过VBA生成用友T3凭证导入模板。具体数据详见附件。
明细中一般情况是一张发票对应一份凭证；
但若是有多张连号的发票都是同一个单位，则连号的发票对应一份凭证
我有VBA基础，但是目前没有解决思路，还望各位大神指点！感谢！
图1为发票明细：

图2为最终实现的效果

边缘码农

关于图1发票明细：
1、类似第一行的标题行，删除。
2、类似第三行的合计行，删除。
3、不要有合并单元格。

关于图2最终效果：
1、科目编码列中：1122和112202，1122不是末级科目，这点存在问题。
2、其他细节问题，暂且放过。

简单说一下思路：
1、取得已经使用的行数，第一行是标题行，从第2行开始，用for循环处理每一行。可以先将数据导入到二维数组中。
2、判断客户和上一行是否一致，如果不一致，写出应收账款数据、销项税额数据、凭证号+1，如果一致，判断发票号是否和上一行一致，如果不一致，将上一张发票的销项税额写出，如果一致，写出营业收入数据。

思路大致如此，实际编程过程中可能会有一系列的问题需要解决，比如应收账款是借方金额，需要累加，同时一般是第一条分录，按照上述方式，是最后一条分录，只是影响习惯，不影响实际使用。每张发票的销项税额数据需要累加，写出后需要清零，等等。需要不断调试。