|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007):
* 아래줄에 질문을 작성하세요 >>
자료정리중 업체명은 distinct 로 고유값을 가져오고 뒤에는 데이터의 합으로 보고 싶은데요..
일반적으로 sum 을 하니 오류가 나는데요 어떻게 사용해야 하는지 궁금 합니다.
Sub 고객사별_요약()
strSQL = "SELECT DISTINCT 고객사" '수량, 총출고수량, 수주금액, 미출고금액, 자재비, 자재_재고, 외주가공비_반입, 외주가공_재고, 소재NEGO금액, 자재미입고, 가공미입고"
strSQL = strSQL & " FROM [2022년_Data$] "
strSQL = strSQL & " where 총출고수량 > 0 "
strSQL = strSQL & " order by 고객사 "
strConn = "Provider= Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & ThisWorkbook.FullName & ";" & "Extended Properties= Excel 12.0;"
Set rngRS = New ADODB.Recordset
rngRS.Open strSQL, strConn, adOpenForwardOnly, adLockReadOnly, adCmdText
Range("A2").CopyFromRecordset rngRS
각종_비용
End Sub
|
|