Snasui Excel Forum

ต้องขอขอบคุณจริงๆค่ะ ช่วยได้มากเลย

ขอบคุณมากค่ะ :thup:



:D ลองปรับ Code เป็นตามด้านล่างครับ
Sub CollecDataCPT()
Dim wh As Worksheet, rSource As Range
Dim grandTotal As Double, subTotal As Double
Dim rTarget As Range
For Each wh In Worksheets
If wh.Name <> "CollecData" Then
With wh
Set ...

ต้องขอรบกวนสอบถามค่ะ เรื่องการเขียน Code VB ใน excel ตาม File แนบมีคำถามดังนี้ค่ะ
Sheet "CollecData" ต้องการ Copy ข้อมูลจาก 2 sheet มาต่อกันและทำการรวมยอดแต่ละช่วง จากนั้นทำยอด GrandTotal ด้านล่างค่ะ
ดิฉันพยายามเขียน Code เท่าที่ทำได้ก็ไม่สำเร็จค่ะ และที่สำคัญข้อมูลที่ 2 sheet จะมีจำนวนไม่คงที่ในแต ...