Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1834|回复: 7

[已解决]如何用SUMIF来统记呢?

[复制链接]
发表于 2016-5-3 15:32 | 显示全部楼层 |阅读模式
本帖最后由 tt1668 于 2016-5-3 15:43 编辑

比如说A1:A10是日期,B1:B10是种类,C1:C10是价钱,要如何算出这个月份里这个种类的全部价钱呢?
最佳答案
2016-5-3 16:34
数据要洗澡啊...
  1. =TEXT(SUMPRODUCT((TRIM($B$3:$B$10)=$A17)*(UPPER(TEXT($A$3:$A$10,"mmm"))=B$16),$D$3:$D$10),"0;;;")
复制代码
不用辅助列,公式右拖下拉

TEST2.rar

7.23 KB, 下载次数: 11

发表于 2016-5-3 15:36 | 显示全部楼层
回复

使用道具 举报

发表于 2016-5-3 16:07 | 显示全部楼层
  1. Sub 汇总()
  2.     monthrr = Array("JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL", "AUG", "SEP", "OCT", "NOV", "DEC")
  3.     Set d = CreateObject("scripting.dictionary")
  4.     arr = Range("a2:d10")    '源数据区域,请自行调整
  5.     ReDim brr(1 To UBound(arr) + 1, 1 To 13)
  6.     For i = 2 To UBound(arr)
  7.         x = arr(i, 2)
  8.         If Not d.exists(x) Then
  9.             n = n + 1
  10.             brr(n, 1) = x
  11.             d(x) = n
  12.         End If
  13.         m = Month(arr(i, 1))
  14.         If mmax < m Then mmax = m    '出现的最大月份
  15.         p = d(x)
  16.         If arr(i, 4) > 0 Then brr(p, m + 1) = brr(p, m + 1) + arr(i, 4)
  17.     Next
  18.     If n > 0 Then
  19.         [b16].Resize(1, mmax) = monthrr    '出现的最大月份为横表头
  20.         [a17].Resize(n, mmax + 1) = brr
  21.     End If
  22. End Sub
复制代码

TEST2.rar

17.1 KB, 下载次数: 1

回复

使用道具 举报

发表于 2016-5-3 16:17 | 显示全部楼层
用公式也可以,要先做辅助列E列,公式为E3=month(A3),获得月份
B17=SUMIFS($D$3:$D$10,$B$3:$B$10,$A17,$E$3:$E$10,COLUMN(B1)-1)
回复

使用道具 举报

 楼主| 发表于 2016-5-3 16:24 | 显示全部楼层
这算是对的,但是使用上有有点不放便咯。
回复

使用道具 举报

发表于 2016-5-3 16:34 | 显示全部楼层    本楼为最佳答案   
数据要洗澡啊...
  1. =TEXT(SUMPRODUCT((TRIM($B$3:$B$10)=$A17)*(UPPER(TEXT($A$3:$A$10,"mmm"))=B$16),$D$3:$D$10),"0;;;")
复制代码
不用辅助列,公式右拖下拉

评分

参与人数 2 +31 收起 理由
橘子红 + 30 赞一个
E三E四 + 1 来学习

查看全部评分

回复

使用道具 举报

 楼主| 发表于 2016-5-3 17:22 | 显示全部楼层
望帝春心 发表于 2016-5-3 16:34
数据要洗澡啊...不用辅助列,公式右拖下拉

有点问题,为什么没有点数的呢?
回复

使用道具 举报

发表于 2016-5-4 17:15 | 显示全部楼层
tt1668 发表于 2016-5-3 17:22
有点问题,为什么没有点数的呢?

你是说还要保留两位小数吗?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-18 22:20 , Processed in 0.293224 second(s), 14 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表