วางข้อมูลรายการสินค้าจากตารางเพื่อแยกส่งสาขา

[beekk]

เรียน ท่านอาจารย์
เนื่องด้วยมีปัญหาเกี่ยวกับการทำข้อมูลแยกรายการสินค้าตามสาขาตามตัวอย่างที่แนบมาด้วยนี้ครับ ความต้องการคือจากชีท1เป็นการสรุปข้อมูลสินค้าธูปหอมกลิ่นต่างๆว่ามีจำนวนที่ต้องทำการจัดส่งไปยังศูนย์กระจายสินค้าเป็นจำนวนเท่าใด และจะต้องทำการพิมพ์ป้ายติดที่กล่องสินค้าทุกกล่องตามแบบชีท2ครับ อาจารย์ช่วยกรุณาแนะนำวิธี หรือสูตรของเอ็กเซลให้ด้วยครับ ขอแสดงความนับถือ หากผิดกฏอย่างไรต้องขออภัยด้วยนะครับ

[snasui]

ตัวอย่างการปรับปรุงข้อมูลและตัวอย่างสูตรครับ

ที่ Sheet1 ปรับข้อมุลให้เรียงลงด้านล่างแทนการเรียงไปด้านขวา (ดูภาพประกอบ) จากนั้นที่ E2 คีย์สูตร

=INT((ROWS(E$2:E2)-1)/12)+1

Enter > Copy ลงด้านล่าง

ที่ Sheet2

1. ที่ C2 คีย์
   =OFFSET(Sheet1!$B$1,MATCH(COUNTIF($A$1:B$1,$A$1),Sheet1!$E$2:$E$51,0)+COUNTIF($A$2:$A2,$A2)-1,0)
   Enter
2. ที่ B3 คีย์
   =OFFSET(Sheet1!$D$1,MATCH(COUNTIF($A$1:A$1,$A$1),Sheet1!$E$2:$E$51,0)+COUNTIF($A$2:$A3,$A3)-1,0)
   Enter
3. ที่ B4 คีย์
   =OFFSET(Sheet1!$C$1,MATCH(COUNTIF($A$1:A$1,$A$1),Sheet1!$E$2:$E$51,0)+COUNTIF($A$2:$A4,$A4)-1,0)
   Enter
4. Copy สูตรข้อ 1-3 ไปด้านล่างและด้านขวาในคอลัมน์อื่น ๆ

โปรดสังเกตว่าข้อมูลต้นทางมีมากกว่าตำแหน่งการวาง ดังนั้นควรจะมีชุดข้อมูลจริงเก็บไว้ที่ชีตอื่น ๆ แล้วนำมาวางทีละชุดแล้วพิมพ์ด้วยจำนวนเดียวกับตำแหน่งการวาง ทำเช่นนี้จนครบตามจำนวนข้อมูลจริงครับ

[beekk]

เรียน ท่านอาจารย์ที่นับถือ
ขอขอบคุณที่อาจารย์กรุณาให้คำตอบครับ และผมขอรบกวนเพิ่มเติมดังนี้ครับ ถ้าในการส่งสินค้า เช่น ธูปหอมกลิ่นกุหลาบ ไปสาขา กรุงเทพมหานคร ต้องติดป้ายลาเบลทุกกล่องของกลิ่นนี้ (จำนวน 12 ป้าย) จะสามารถปรับสูตรเอ็กเซลอย่างไรได้บ้างครับ ขอแสดงความนับถือ

[snasui]

ผมเขียนไว้ชัดเจนแล้วลองอ่านทบทวนอย่างละเอียดแล้วทำมาตามนั้น ติดปัญหาตรงไหนให้แนบไฟล์นั้นมาถามกันต่อครับ

[beekk]

เรียน ท่านอาจารย์ที่นับถือ
ผมขออนุญาตเรียนถามเพิ่มเติม หากต้องการพิมพ์ให้ได้จำนวนแผ่นป้ายตามจำนวนของสินค้า ต้องปรับสูตรอย่างไรครับ ขอบคุณครับ

[snasui]

อ่านแล้วไม่กระจ่างครับ

หมายถึงหากเป็นจำนวน 12 กล่องให้แสดงป้ายเดียวกัน 12 ป้าย เช่นนั้นหรือไม่ อย่างไรครับ

[beekk]

ใช่ครับ

[snasui]

ตัวอย่างการปรับสูตรครับ

Sheet1

1. ที่ E2 คีย์
   =SUM(D$2:D2)-D2+1
   Enter > Copy ลงด้านล่างจนสุดข้อมูล
2. ที่ D52 คีย์
   =SUM(D2:D51)
   Enter
3. ที่ H1 คีย์
   =B1
   Enter > Copy ไปด้านขวาถึง K1
4. ที่ H2 คีย์
   =IF(ROWS(H$2:H2)>$D$52,"",LOOKUP(ROWS(H$2:H2),$E$2:$E$51,B$2:B$51))
   Enter > Copy ลงด้านล่างจนเห็นเป็นค่าว่าง
5. ที่ I2 คีย์
   =IF(ROWS(I$2:I2)>$D$52,"",LOOKUP(ROWS(I$2:I2),$E$2:$E$51,C$2:C$51))
   Enter > Copy ลงด้านล่างจนเห็นเป็นค่าว่าง
6. ที่ J2 คีย์
   =IF(ROWS(J$2:J2)>$D$52,"",LOOKUP(ROWS(J$2:J2),$E$2:$E$51,D$2:D$51))
   Enter > Copy ลงด้านล่างจนเห็นเป็นค่าว่าง
7. ที่ K2 คีย์
   =INT((ROWS(K$2:K2)-1)/12)+1
   Enter > Copy ลงด้านล่างเท่าที่มีข้อมูล

Sheet2

1. ที่ C2 คีย์
   =OFFSET(Sheet1!$H$1,MATCH(COUNTIF($A$1:B$1,$A$1),Sheet1!$K$2:$K$1000,0)+COUNTIF($A$2:$A2,$A2)-1,0)
2. ที่ B3 คีย์
   =OFFSET(Sheet1!$J$1,MATCH(COUNTIF($A$1:A$1,$A$1),Sheet1!$K$2:$K$1000,0)+COUNTIF($A$2:$A3,$A3)-1,0)
3. ที่ B4 คีย์
   =OFFSET(Sheet1!$I$1,MATCH(COUNTIF($A$1:A$1,$A$1),Sheet1!$K$2:$K$1000,0)+COUNTIF($A$2:$A4,$A4)-1,0)
4. คัดลอกสูตรตามข้อ 1-3 ไปยังเซลล์ที่เกี่ยวข้อง

[beekk]

เรียน ท่านอาจารย์ที่นับถือ
ผมนำสูตรที่ท่านอาจารย์ปรับให้มาทดลองใช้แล้วผลปรากฎว่าถูกต้องได้ตามที่ต้องการ ผมขอขอบพระคุณเป็นอย่างสูงที่ท่านอาจารย์ให้ความกรุณา ขอแสดงความนับถือ