รบกวนช่วยแก้โจทย์สุ่มหาคะแนนย่อยจากคะแนนรวมหน่อย

[nyrithy]

พอดีผมรับคะแนนมาเป็นคะแนนรวม 20 คะแนน
แต่ต้องกรอกลงในไฟล์ที่เป็นที่ต้องมีคะแนนยอ่ย 4 ช่อง ๆ ละ 5 คะแนน
(รายละเอียดในไฟล์ที่แนบมาครับ)
หลายปีแล้วครับที่ต้องคีย์เองที่ละเซล แต่ตอนนี้ต้องทำเยอะเลยครับ
นักเรียนพันกว่าคน
ขอกราบขอความช่วยเหลือด้วยครับ
Rand() if() Randbetween() ก็สูตรที่ยากสำหรับผมแล้ว
ผมเคยโพสแล้วรอบหนึ่ง มีคนให้ผมใช้ Solver มืดสนิดเลยครับ
ไม่รู้เรื่อง กราบขอบพระคุณล่วงหน้างามๆสามทีครับ

[snasui]

ให้ไปถามตอบในกระทู้นั้นแทนการตั้งกระทู้ใหม่ ทำแล้วติดขัดอย่างไรก็ให้แจ้งกันมาได้เรื่อย ๆ ไม่ควรมาตั้งกระทู้ใหม่ครับ

[nyrithy]

ให้ไปถามตอบในกระทู้นั้นแทนการตั้งกระทู้ใหม่ ทำแล้วติดขัดอย่างไรก็ให้แจ้งกันมาได้เรื่อย ๆ ไม่ควรมาตั้งกระทู้ใหม่ครับ

อันก่อนเขียนอธิบายไม่ค่อยชัดเจน คิดว่าจะลบโพสเก่าดีกว่า

[menem]

สูตรในช่อง B3
=IF(ROUND($F3/$F$2*SUM($B$2:B$2),0)=3,ROUND($F3/$F$2*SUM($B$2:B$2),0)+IF(RAND()>0.5,1,-1),ROUND($F3/$F$2*SUM($B$2:B$2),0))

ผลอาจจะทำให้สอบตกในบางครั้งได้นะครับ (ไม่ถึง 3)

[nyrithy]

สูตรในช่อง B3
=IF(ROUND($F3/$F$2*SUM($B$2:B$2),0)=3,ROUND($F3/$F$2*SUM($B$2:B$2),0)+IF(RAND()>0.5,1,-1),ROUND($F3/$F$2*SUM($B$2:B$2),0))

ผลอาจจะทำให้สอบตกในบางครั้งได้นะครับ (ไม่ถึง 3)

แล้วช่องต่อไปละครับ

[menem]

copy ไปให้ครบครับ

[nyrithy]

copy ไปให้ครบครับ

ไม่ได้อ่ะครับ ลองแล้ว ผลบากเกินเยอะเลย

[menem]

ขอโทษด้วยครับลืมไปว่าสูตรมันจะมีต่างกันเล็กน้อย
B3
=IF(ROUND($F3/$F$2*SUM($B$2:B$2),0)=3,ROUND($F3/$F$2*SUM($B$2:B$2),0)+IF(RAND()>0.5,1,-1),ROUND($F3/$F$2*SUM($B$2:B$2),0))

C3
=IF(ROUND($F3/$F$2*SUM($B$2:C$2),0)=3,ROUND($F3/$F$2*SUM($B$2:C$2),0)+IF(RAND()>0.5,1,-1),ROUND($F3/$F$2*SUM($B$2:C$2),0))-SUM($B3:B3)
แล้ว Copy จาก C3 ไปจนถึง E3 ครับ