用VBA或SQL解决，多条件查找

无声地拥抱 · 发表于 2024-10-18 23:24

本帖最后由无声地拥抱于 2024-10-19 08:01 编辑

因数据量大，公式不能解决
求红色区域内容
昨天发布一个类似的求助题，但给热心帮助人造成理解错，在此表示抱歉！
现重新发表要求及附件
望能再帮忙下
求助

无声地拥抱 · 发表于 2024-10-18 23:35

求助，因数据量大，对于VBA也是初学者

无声地拥抱 · 发表于 2024-10-19 05:33

求关注，求解决

ykcbf1100 · 发表于 2024-10-19 07:37

先上传附件。

无声地拥抱 · 发表于 2024-10-19 07:54

ykcbf1100 发表于 2024-10-19 07:37
先上传附件。

这是附件及要求
求红色区域内容
求助

z865593849 · 发表于 2024-10-19 09:05

sql汇总

无声地拥抱 · 发表于 2024-10-19 09:31

z865593849 发表于 2024-10-19 09:05
sql汇总

如何只列出来结果表F列红色区域的内容

无声地拥抱 · 发表于 2024-10-19 09:40

z865593849 发表于 2024-10-19 09:05
sql汇总

如何只列出结果表的F列的数据

ZHLK · 发表于 2024-10-19 10:00

你这不是单条件查询，对应关系不对，比如面条粉有两项

做了一个例子，你比照调整一下。先命名名称
Sub demo()
Rows("12:200").Delete Shift:=xlUp
With ActiveSheet.ListObjects.Add(SourceType:=0, Source:="ODBC;DSN=Excel Files;DBQ=" & ThisWorkbook.FullName, Destination:=Range("$A$12")).QueryTable
      .CommandType = xlCmdSql
      .CommandText = "SELECT 数据源.业务员, 数据源.客户代码, 数据源.客户1, 品项对照.品项, 数据源.品牌, Sum(数据源.重量) AS 重量之合计" & Chr(13) & "" & Chr(10) & "FROM 数据源 INNER JOIN 品项对照 ON 数据源.产品名称 = 品项对照.对应产品名称值" & Chr(13) & "" & Chr(10) & "GROUP BY 数据源.业务员, 数据源.客户代码, 数据源.客户1, 品项对照.品项, 数据源.品牌"
      .ListObject.DisplayName = "表_1"
      .Refresh BackgroundQuery:=False
End With
End Sub

shiruiqiang · 发表于 2024-10-19 10:31

本帖最后由 shiruiqiang 于 2024-10-19 10:41 编辑

代码和你的结果有误，最后怎么算出来的？

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

[求助] 用VBA或SQL解决，多条件查找