Page 1 of 1

Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 11:30 am
by Swackzer
ผมต้องการใช้ Random คอลัม SUM โดยไม่ซ้ำกันนะครับมาแสดงในช่อง RANDOM
ต้องใช้สูตรอย่างไรครับผม ผมมีข้อมูลอยู่ประมาณ 50 ชื่อ/ ขอบคุณครับ
test.PNG
ผมแนบไฟล์ตัวอย่างไว้ให้แล้ว ขอบคุณครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 11:42 am
by Totem
Swackzer wrote:ผมต้องการใช้ Random คอลัม SUM โดยไม่ซ้ำกันนะครับมาแสดงในช่อง RANDOM
ต้องใช้สูตรอย่างไรครับผม ผมมีข้อมูลอยู่ประมาณ 50 ชื่อ/ ขอบคุณครับ
test.PNG
ผมแนบไฟล์ตัวอย่างไว้ให้แล้ว ขอบคุณครับ
:D ที่เขียนไว้ในหัวข้อ Re: การสุ่มชื่อโดยไม่ให้ซ้ำกัน

ปรับสูตรแล้วใช้ได้ไหมครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 11:56 am
by Totem
:D ลองตามนี้ครับ

1. G2 =INDEX($E$2:$E$11,MATCH(A2,$J$2:$J$11,0)) คัดลอกลงมาด้านล่าง

2. H2 =COUNTIFS(A$2:A2,A2)=1 คัดลอกลงมาด้านล่าง

3. I2 =IF(H2,RAND(),FALSE) คัดลอกลงมาด้านล่าง

4. J2 =IF(I2,RANK(I2,$I$2:$I$11),FALSE) คัดลอกลงมาด้านล่าง

5. จากนั้น ลองกด F9 แล้ว สังเกตุการเปลี่ยนแปลงครับ

ปัญหาคล้ายๆกัน ควรจะใช้หัวข้อเดิมครับ อย่างไรเดี่ยวให้อาจารย์มาจับรวมกระทู้ไว้ด้วยกันครับ

ถ้าปรับใช้ได้ผลอย่างไร ช่วยแจ้งด้วยครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 12:00 pm
by Swackzer
รับทราบครับ ลองแล้วอันนั้นมัน False บางช่องครับ
เลยจัดเรียงรูปแบบใหม่เผื่อจะง่ายขึ้นครับ เลยมาาตั้งหัวข้อใหม่ ขออภัยด้วยครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 1:16 pm
by Totem
Totem wrote::D ลองตามนี้ครับ

1. G2 =INDEX($E$2:$E$11,MATCH(A2,$J$2:$J$11,0)) คัดลอกลงมาด้านล่าง

2. H2 =COUNTIFS(A$2:A2,A2)=1 คัดลอกลงมาด้านล่าง

3. I2 =IF(H2,RAND(),FALSE) คัดลอกลงมาด้านล่าง

4. J2 =IF(I2,RANK(I2,$I$2:$I$11),FALSE) คัดลอกลงมาด้านล่าง

5. จากนั้น ลองกด F9 แล้ว สังเกตุการเปลี่ยนแปลงครับ

ปัญหาคล้ายๆกัน ควรจะใช้หัวข้อเดิมครับ อย่างไรเดี่ยวให้อาจารย์มาจับรวมกระทู้ไว้ด้วยกันครับ

ถ้าปรับใช้ได้ผลอย่างไร ช่วยแจ้งด้วยครับ
:D ข้อ2 เปลี่ยนเป็น H2 =COUNTIFS(E$2:E2,E2)=1 คัดลอกลงมาด้านล่าง

ถ้าหากขึ้น FALSE ในคอลัมน์ H,I,J ที่ cell ใดๆ แปลว่า E2:E11 ใดๆ มีซ้ำ ทำให้ G2:G11 จึงไม่สุ่มมาให้ครับ
ลองดูครับไม่ทราบว่าใช่แบบนี้หรือเปล่าครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 3:19 pm
by DhitiBank
หรือหากยังพบ False ลองแบบนี้ดูครับ
ที่ G2 คีย์

Code: Select all

=INDEX($E$2:$E$11,I2)
Enter

ที่ H2 คีย์

Code: Select all

=RAND()
Enter

ที่ I2 คีย์

Code: Select all

=RANK(H2,$H$2:$H$11)
Enter

คัดลอกทั้ง 3 สูตรลงมาด้านล่างถึงแถวที่ 11 แล้วกด F9 สังเกตดูผลครับ

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Thu Jan 22, 2015 5:18 pm
by Swackzer
ขอบคุณมากครับ เดี๋ยวลองดูครับผม

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Fri Jan 23, 2015 11:16 am
by ZEROV
ลองอีกสูตร
F2=RAND()
G2=INDEX(E:E,MATCH(LARGE(F:F,ROW(A1)),F:F,0))
Copy สูตรลง

Re: Random รายชื่อ มีไฟล์แนบครับ

Posted: Mon Jan 26, 2015 12:05 pm
by menem
ทำแบบนี้อาจจะง่ายกว่านะครับ

1. แทรก Column 1 ช่อง (ในตัวอย่างไฟล์ผมแทรก 2 จะได้เห็นได้ชัด)
2. ป้อนสูตร =Rand() + ( ลำดับที่ / 1000000 )
ที่ให้มีบวก เพื่อป้องกันกรณี Random แล้วได้เลขซ้ำกัน ก็จะถูกบวกด้วยลำดับ
(แต่ตัวลำดับจะถูกหารทำให้ค่ามีน้อยมาก)
3. จากนั้นทำ Vlookup ( Large ( จากคอลัมน์ที่แทรก , ลำดับที่ ) ตารางทั้งหมด , คอลัมน์ที่ต้องการ False )
ในช่องผลลัพธ์ที่ต้องการอีกที