>>673
エクセルのほうが簡単だと思います。
A列：1〜20000までの連番
B列：口数
C列：∔B1/B列合計 (以下コピー)
D列：1行目は0、2行目 +C1、3行目以降は=+D2+C2をコピー
E列：+A1(以下コピー)
F列：=RAND()(以下コピー)
G列：=VLOOKUP(+F1,D$1:E$20000,2)を300行目までコピー
300/20000なら大口がいないと重複しなさそう。
重複があったらシートコピーして当選行を削除。