[已解决]请老师帮我把汇总条件加上！

excel010 · 发表于 2014-11-6 09:08

SQL全表汇总一.rar (25.27 KB, 下载次数: 14)

zjdh · 发表于 2014-11-6 09:47

SQL对数据的类型要求很严格，你必须预先说明各“内容”的数据类型，否则无法编写语句！
例如：
经手人文本
内容一文本
内容三数字
............

excel010 · 发表于 2014-11-6 09:53

zjdh 发表于 2014-11-6 09:47
SQL对数据的类型要求很严格，你必须预先说明各“内容”的数据类型，否则无法编写语句！
例如：
经手人 ...

老师，除数值1，数值2，其它的都是文本！！！

朱荣兴 · 发表于 2014-11-6 11:02

方法是笨点，在d4：f4填入条件，1——3个条件均可，

Sub 筛选()
Dim i, wdrow, fkh, j
For i = 5 To Sheets.Count
wdrow = Sheets(i).[b65536].End(xlUp).Row
fkh = Sheets("查询表").[b65536].End(xlUp).Row + 1
Sheets(i).Select
Range("B4:M" & wdrow).Select
Range("B4:M12").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets( _
"查询表").Range("D3:F4"), CopyToRange:=Sheets("查询表").Range("B" & fkh & ":M65536"), Unique:=False
Next i
For j = Sheets("查询表").[b65536].End(xlUp).Row To 6 Step -1
If Sheets("查询表").Cells(j, 2).Value = "编号" Then
Sheets("查询表").Rows(j).Delete
End If
Next
End Sub

复制代码

zjdh · 发表于 2014-11-6 12:55

本帖最后由 zjdh 于 2014-11-6 13:05 编辑

SQL全表汇总一.rar (33.88 KB, 下载次数: 16)

朱荣兴 · 发表于 2014-11-6 17:34

那你把条件区域改为这样不就行了
Sheets( _
"查询表").Range("C3:F4"),

excel010 · 发表于 2014-11-6 21:37

zjdh 发表于 2014-11-6 12:55

一直忙到现在回家，刚看到老师帮我加的查询条件，真是太棒了，

谢谢老师在百忙之中抽空给我解决难题！

下面这个问题是这样的

查询条件
开始日期：2012-1-1
结束日期：2012-1-2
经手人：甲

这期间甲，类A，【数值一】的数值进行求和，在这期间它的合计值是20000
然后是甲 , 类B，【数值一】的数值进行求和，在这期间它的合计只是12000

SQL全表汇总一.rar (33.61 KB, 下载次数: 9)

excel010 · 发表于 2014-11-7 10:03

excel010 发表于 2014-11-6 21:37
一直忙到现在回家，刚看到老师帮我加的查询条件，真是太棒了，

谢谢老师在百忙之中抽空给我解决难题！ ...

?????????????????????????????????

excel010 · 发表于 2014-11-7 10:04

zjdh 发表于 2014-11-6 12:55

???????????????????????????????????

		自动登录	找回密码
密码			注册

[已解决]请老师帮我把汇总条件加上！

点评