[已解决]如何用VBA统计小于指定的月份借方和贷方的分别发生累计数

272779357

如果B2单元格等于4，则1月，2月，3月份累计借方发生额

最佳答案

月排行榜 / 总排行榜

七彩屋

2016-4-20 17:33

如何用VBA统计小于指定的月份借方和贷方的分别发生累计数.rar (11.01 KB, 下载次数: 12)

2016-4-20 17:33 上传

点击文件名下载附件

跳转到最佳答案楼层

272779357

七彩屋

1. Sub qcw()
   
2. Dim i, j, x, y
   
3. For i = 4 To 14
   
4.   With Sheet1
   
5.   x = 0: y = 0
   
6.     For j = 2 To .Range("a65536").End(xlUp).Row
   
7.       If .Cells(j, 1) < Range("B1") And .Cells(j, 2) = Cells(i, 1) Then
   
8.         x = .Cells(j, 3) + x: y = .Cells(j, 4) + y
   
9.       End If
   
10.     Next j
    
11.     Cells(i, 2) = x: Cells(i, 3) = y
    
12.   End With
    
13. Next i
    
14. End Sub

复制代码

七彩屋

如何用VBA统计小于指定的月份借方和贷方的分别发生累计数.rar (11.01 KB, 下载次数: 12)

2016-4-20 17:33 上传

点击文件名下载附件

272779357

感谢导师，非常棒，