|
楼主 |
发表于 2014-3-2 15:10
|
显示全部楼层
hwc2ycy 发表于 2014-3-2 13:22
有个问题,因为在列表中显示了日期,所以汇总导出时,如果销售日期不同,就会有两条同样的记录。
要不就 ...
先去掉这段
ColumnHeaders.Add 7, , Sheets("sheet1").Cells(5, 9), Width:=.Width / 7, Alignment:=lvwColumnCenter
下面这段再改成这样,就不会出现你提到的问题了,是吗???谢谢老师,辛苦啦!!!现在终于可以工作啦!!!
et AdoRst1 = AdoConn.Execute("select 销售区域,商品名称,预设,分类,sum(销售数量),sum(销售金额) from [sheet1$c5:i] group by 销售区域,商品名称,预设,分类") |
|