Snasui Excel Forum

พอจะมีตัวอย่างการกรองข้อมูลที่มีใน Column หนึ่ง ไปยัง Column อื่นๆ ตามประเภทของตนเองครับ ใครพอมีความรู้เเนวทางบ้างครับ
พอดี ผมเคยดึงข้อมูลมาจาก MSSQl นะครับ เเต่มันช้าเนื่องจากต้อง Connect MSSQL หลายครั้ง เลยอยากดึงมาครั้งเดียวเเล้วก็กรองใน Excel เลย
ผมมีไฟล์ตัวอย่างผลลัพธ์มาให้ดูครับ
ท่าเป็นไปได้ ขอดูโค้ด VBA พอดีผมจะ ไป ปรับปรุ่งกับ Project ที่ผมเขียนไว้นะครับ

ลองตามนี้ครับ

ที่ชีท Data_Gen

1. เซลล์ A1:G1 สังเกตว่าจะมีการกดวรรคไป 1 ครั้งหลังอักขระสุดท้าย ต้องลบทิ้งให้หมด ห้ามวรรคครับ
2. เซลล์ A2 คีย์สูตร
   =IFERROR(INDEX(Data_Model!$A$2:$A$6315,SMALL(IF(A$1=Data_Model!$B$2:$B$6315,ROW(Data_Model!$A$2:$A$6315)-ROW(Data_Model!$A$2)+1),ROWS(A$2:A2))),"")
   Ctrl+Shift+Enter > Copy ไปด้านขวาและลงด้านล่าง

!

Note: Ctrl+Shift+Enter หมายถึง กรณีคีย์สูตรเอง เมื่อคีย์สูตรแล้ว แทนที่จะกด Enter ให้กดแป้น Ctrl+Shift ค้างไว้แล้วกด Enter เพื่อสร้างเป็นสูตร Array กรณี Copy สูตรไปวางให้กดแป้น F2 เพื่อทำการ Edit Cell นั้นก่อน จากนั้นกดแป้น Ctrl+Shift ค้างไว้แล้วกด Enter เพื่อสร้างเป็นสูตร Array หากกดแป้นถูกต้องสูตรนั้นจะมีเครื่องหมายปีกกาครอบ เช่น {=YourFormulas(...)} ปีกกานี้คีย์เข้าไปเองไม่ได้ ถ้ายังไม่เห็นปีกกาครอบสูตรแสดงว่ากดแป้นให้รับสูตรไม่ถูกต้อง การแก้ไขเปลี่ยนแปลงสูตร Array จะต้องกดแป้นให้รับสูตรด้วย Ctrl+Shift+Enter ทุกครั้ง