按单价分组的sql语句

gjj136138139

按单价分组，统计每种单价的记录的条数，并连接成字符串，最后结果是字符串形式，只能用sql语句即ADO来写。（用字典循环的话，就很容易，但是不符合要求）。结果是要这个字符串：2*1000+4*800+2*600+1*500+1*0

limonet

抱歉了，我无法创造条件来满足你的问题。

cui26896

实现不了，“+"是保留字，不可在查询语句作为字符串存在！

limonet

关键字：group

limonet

Sub Limonet()
    Dim StrSQL$, Cn As Object
    Set Cn = CreateObject("ADODB.connection")
    Cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties=excel 12.0;Data Source=" & ThisWorkbook.FullName
    StrSQL = "Select 合同编号,Count(*),'" _
        & Join(WorksheetFunction.Transpose(WorksheetFunction.Transpose(Cn.Execute("Select Count(*)&'*'&单价 From [sheet1$a:c] Group By 合同编号,单价").GetRows)), "+") _
        & "' From [sheet1$a:c] Group By 合同编号"
    Range("J4").CopyFromRecordset Cn.Execute(StrSQL)
End Sub

知了Cicada

就是结果顺序不太一样

zpy2

//select * from 分组计数后合并多行 limit 20;
select group_concat(次||'*'||单价,'+') from (
select 单价,count(1) 次 from 分组计数后合并多行 group by 单价 order by rowid);

剑指E

。        

caiyu93

不让用字典,那用什么?那就用正则吧?如果你的数据基本是这个样的话...

jiangxiaoyun

sql就不适合在excel这样搞。下次用sql搞原子弹吧。