EXCEL TOOLS
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
Excel Add-ins ที่พัฒนาโดยคุณสันติพงศ์ ณสุย (MVP Excel 2010-2020) ด้วยภาษา C# เพื่อแก้ไขปัญหาไฟล์ใหญ่ คำนวณนาน ทำงานช้า จัดการข้อมูลต่าง ๆ ที่ทำงานประจำวันได้อย่างสะดวกรวดเร็ว สนใจคลิกไปดูได้ที่นี่ครับ => Excel Tools
[code]
และปิดด้วย [/code]
ตัวอย่างเช่น [code]dim r as range[/code]
เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่างเพิ่มเติม)select aa.[Document No_] as RP
,aa.[Item No_]
,aa.[Source No_] as ITEMSFG
,(sum(aa.[Quantity]))*-1 as [Paper Quantity]
,cc.[Paper SQM per Sheet]
,case when cc.[Paper SQM per Sheet] = 0 then (sum(aa.[Quantity]))*-1
when cc.[Paper SQM per Sheet] > 0 then (sum(aa.[Quantity]))*-1 * cc.[Paper SQM per Sheet]
end as [Total input Area SQM]
FROM [PPC_PROD_2017].[dbo].[ppp_$Item Ledger Entry] aa
inner join [dbo].[ppp_$Item] bb
on aa.[Source No_] = bb.No_
inner join (SELECT [No_]
,case when [UOM - Width]='INC' then ((Width * Length)* 0.000645 )
when [UOM - Width]='CM.' then ((Width * Length)* 0.0001 )
else 0
end as [Paper SQM per Sheet]
FROM [PPC_PROD_2017].[dbo].[ppp_$Item]
where [Item Category Code] in ('RM_PAPER','RM_STK_R','RM_STICKER')) cc
on aa.[Item No_] = cc.No_
where aa.[Entry Type] = 5 and aa.[Item No_] like '27%' and aa.[Item Category Code] in ('RM_PAPER','RM_STK_R','RM_STICKER') and aa.[Document No_] = 'RP21010289'
group by aa.[Item No_],aa.[Source No_],aa.[Document No_],cc.[Paper SQM per Sheet]
Code: Select all
SELECT [RS.RP], [RS.Item No_], SUM([Total input Area SQM])
FROM
(SELECT aa.[Document No_] AS RP
,aa.[Item No_]
,aa.[Source No_] AS ITEMSFG
,sum(aa.[Quantity])*-1 AS [Paper Quantity]
,cc.[Paper SQM per Sheet]
,CASE WHEN cc.[Paper SQM per Sheet] = 0 THEN sum(aa.[Quantity])*-1
WHEN cc.[Paper SQM per Sheet] > 0 THEN sum(aa.[Quantity])*-1 * cc.[Paper SQM per Sheet]
END AS [Total input Area SQM]
FROM [PPC_PROD_2017].[dbo].[ppp_$Item Ledger Entry] aa
INNER JOIN [dbo].[ppp_$Item] bb ON aa.[Source No_] = bb.No_
INNER JOIN
(SELECT [No_]
,CASE WHEN [UOM - Width]='INC' THEN (Width * Length)* 0.000645
WHEN [UOM - Width]='CM.' THEN (Width * Length)* 0.0001
ELSE 0 END AS [Paper SQM per Sheet]
FROM [PPC_PROD_2017].[dbo].[ppp_$Item]
WHERE [Item Category Code] IN ('RM_PAPER','RM_STK_R','RM_STICKER')
) cc
ON aa.[Item No_] = cc.No_
WHERE aa.[Entry Type] = 5
AND aa.[Item No_] LIKE '27%'
AND aa.[Item Category Code] IN ('RM_PAPER','RM_STK_R','RM_STICKER')
AND aa.[Document No_] = 'RP21010289'
GROUP BY aa.[Item No_]
,aa.[Source No_]
,aa.[Document No_]
,cc.[Paper SQM per Sheet]
) AS RS
GROUP BY [RS.RP], [RS.Item No_]