Excel精英培训网

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

在物品需求表中使用 SQL 去除重复项,并统计汇总重复的数据,请求帮忙,谢谢!

[复制链接]
发表于 2018-8-7 13:10 | 显示全部楼层 |阅读模式
根据生产订单,统计出所需的物品清单,但订单中有很多物品都是重复的,请问在sql中怎么可以去除查询到的重复项只保留一个显示出来,同时在显示出来的哪项统计出所有重复的数据?

物料需求表.rar

22.59 KB, 下载次数: 19

excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2018-8-7 15:46 | 显示全部楼层
mySQL = "select  配件名称,物品编码,物品名称,物品规格型号,单位,sum(用量*订单数量) as 需求,备注 from (" & mySQL1 & ")a,[MPS$A1:C5]b where a.产品型号=b.产品型号 group by 配件名称,物品编码,物品名称,物品规格型号,单位,备注"
回复

使用道具 举报

发表于 2018-8-7 15:49 | 显示全部楼层
  1. Sub 物品清单()
  2.     Dim mySQL As String, i As Long
  3.     Application.ScreenUpdating = False
  4.     '*******************************************
  5.     '清除区域的数据
  6.     Sheet1.Range("a9:g63335").ClearContents
  7.    
  8.     Set mycnn = CreateObject("adodb.connection")
  9.     Set rs = CreateObject("adodb.recordset")
  10.     mycnn.Open ("Provider=Microsoft.Ace.OLEDB.12.0;Extended Properties=excel 12.0;Data Source=" & ThisWorkbook.FullName)
  11.     mySQL = "select  配件名称,物品编码,物品名称,物品规格型号,单位,sum(用量*订单数量) as 需求,备注 from [BOM$A:H] a,[MPS$A1:C5]b where a.产品型号=b.产品型号 group by 配件名称,物品编码,物品名称,物品规格型号,单位,备注"
  12.     Sheet1.[a9].CopyFromRecordset mycnn.Execute(mySQL)
  13.     '***********************************释放内存
  14.     mycnn.Close
  15.     Set mycnn = Nothing
  16.     '*******************************************
  17.     Application.ScreenUpdating = True
  18. End Sub
复制代码
回复

使用道具 举报

 楼主| 发表于 2018-8-7 16:41 | 显示全部楼层
grf1973 发表于 2018-8-7 15:46
mySQL = "select  配件名称,物品编码,物品名称,物品规格型号,单位,sum(用量*订单数量) as 需求,备注 from ( ...

真的非常感谢您的帮忙,谢谢了!
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-3-28 21:54 , Processed in 0.468765 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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