Snasui Excel Forum

** เงื่อนไข **
ข้อมูลในคอมลัมน์ A - D จะมีการคีย์ข้อมูลเพิ่มขึ้นเรื่อยๆต่อท้ายลงไป (ข้อมูลอาจมีถึง 3000 แถวหรือมากกว่าครับ)

** ความต้องการ **
อยากให้มีการแสดงการตรวจสอบว่ามีการคีย์ข้อมูลในคอลัมน์ C ซ้ำชื่อที่เคยคีย์ไปแล้ว
ในคอลัมน์ F เพื่อจะได้ดำเนินการตรวจสอบรายละเอียดของการซ้ำต่อไปว่าสามารถ
คีย่ต่อไปได้หรือไม่ เนื่องจากมีเงื่อนไขอื่นๆอีกที่บางครั้งการซ้ำนั้นๆอาจจะต้องคีย์ข้อมูล
เพื่อเก็บเป็นสถิติครับ (ส่วนในคอลัมน์ G ถ้าเป็นไปได้อยากให้แสดงค่าเบื้องต้นของ
ชุดเอกสารที่มีการซ้ำกัน..แต่เมื่อคีย์ข้อมูลไปสักพักอาจมีการซ้ำกันในหลายๆชุดเอกสาร
เช่น ตัวอย่างข้างบน นาย ก จะมีชื่ออยู่ใน ชุดเอกสารที่ 1 , 3 , 5
ในตอนที่คีย์ชุดเอกสารที่ 3 นาย ก จะต้องโชว์ว่า "ซ้ำ" และแสดงชุดเอกสารเป็น " 1 "
ในตอนที่คีย์ชุดเอกสารที่ 5 นาย ก จะต้องโชว์ว่า "ซ้ำ" และแสดงชุดเอกสารเป็น " 1 , 5 "

ตัวอย่างสูตรตามด้านล่างครับ

1. เซลล์ F2 คีย์สูตร
   =IF(COUNTIF(C$2:C2,C2)>1,"ซ้ำ","")
   Enter > Copy ลงด้านล่าง
2. เซลล์ G2 คีย์สูตร
   =IF(F2<>"",IF(COUNTIF(C$2:C2,C2)>2,LOOKUP(2,1/(C$1:C1=C2),G$1:G1)&","&LOOKUP(2,1/(C$1:C1=C2),D$1:D1),LOOKUP(2,1/(C$1:C1=C2),D$1:D1)),"")
   Enter > Copy ลงด้านล่าง

ได้ผลการใช้งานตรงตามที่ต้องการเบื้องต้นแล้วครับ..ขอบคุณอาจารย์มากๆครับ

(หากใช้ตารางตามสูตรนี้แล้วต้องการเงื่อนไขการตรวจสอบที่เพิ่มขึ้นจะมาสอบถามใหม่ครับผม)

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

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

ปรับแต่งสูตรของอาจารย์ที่ให้ไว้เดิมนะครับ โดย
1.ดัก ชื่อ-สกุล ที่อยู่ในชุดเดียวกันไม่ให้แสดงคำว่า ซ้ำ
ที่ F2 =IF(COUNTIF(C$2:C2,C2)>1,IF(SUM(--($C$1:C1&$D$1:D1=C2&D2))>0,"","ซ้ำ"),"") Cltrl+Shift+Enter คัดลอกลงล่าง

2.แสดงผลชุดที่ซ้ำ ตัดอักษรตัวแรกออกหาก เป็นเครื่องหมาย คอมมา(,)
ที่ G2 =IF(F2<>"",IF(COUNTIF(C$2:C2,C2)>2,LOOKUP(2,1/(C$1:C1=C2),G$1:G1)&IF(LOOKUP(2,1/(C$1:C1=C2),G$1:G1)="","",",")&LOOKUP(2,1/(C$1:C1=C2),D$1:D1),LOOKUP(2,1/(C$1:C1=C2),D$1:D1)),"") คัดลอกลงล่าง

ขอบคุณคุณ XDoll มากครับ..ได้ผลตามที่ต้องการแล้วครับผม

กรณีคำตอบด้านล่าง หากเป็น Excel 2003 สูตรเขียนเช่นไร และขอบคุณมา ณ โอกาสนี้
ขอแสดงความนับถือ

ฟงว่อง wrote:กรณีคำตอบด้านล่าง หากเป็น Excel 2003 สูตรเขียนเช่นไร และขอบคุณมา ณ โอกาสนี้
ขอแสดงความนับถือ

พอดีผมไม่ได้ใช้ excel 2003 ครับ ไม่สามารถทดสอบสูตรได้ รออาจารย์และเพื่อนสามาชิกมาเสริมนะครับ

ฟงว่อง wrote:กรณีคำตอบด้านล่าง หากเป็น Excel 2003 สูตรเขียนเช่นไร และขอบคุณมา ณ โอกาสนี้
ขอแสดงความนับถือ

ตามด้านบน ไม่มีฟังก์ชั่นใดที่ใช้กับ Excel 2003 ไม่ได้ กรณีทำแล้วมีปัญหาให้แจ้งปัญหานั้นมาด้วยจะได้ช่วยดูให้ได้ครับ