エクセル データ作成

質問

エクセルの資料に関して

A列　　　B列　　　C列　　D列

Aさん　　項目１　項目２　項目３
Bさん　　
Cさん
Dさん
Eさん
・・・

仕事の割り振り表を作りたいです。

A列にはメンバーデータ（100人）
A列のメンバーをB列C列D列の項目に
ランダムで４人ずつ割り振りたいと思います。

それぞれ重複しないように全員を
割り振れる表を作成するにはどうしたらよいでしょうか？

説明がうまくできてないですがよろしくお願いします。

回答No.1

KURUMITO

お示しのデータがシート1に有って、Ａ2セルから下方に100人の名前が入力されているとします。
そこでランダムに並べた名前をＢ，Ｃ，Ｄ列に並べるのですがそのためには複雑な操作が必要となりますので作業用のシートとしてシート2を用意します。
シート2では次のようにします。
初めにＡ1セルには次の式を入力してＤ1セルまでドラッグコピーしたのちに下方の25行目までドラッグコピーします。

=RAND()

次にＥ1セルには次の式を入力してＨ1セルまでドラッグコピーしたのちに下方の25行目までドラッグコピーします。

=RANK(A1,$A$1:$D$25,0)

次にＩ1セルには次の式を入力してＬ1セルまでドラッグコピーしたのちに下方の25行目までドラッグコピーします。

=IF(COUNTIF($E:$E,ROW(A1))>0,INDEX($E:$H,MATCH(ROW(A1),$E:$E,0),COLUMN(A1)),IF(COUNTIF($F:$F,ROW(A1))>0,INDEX($E:$H,MATCH(ROW(A1),$F:$F,0),COLUMN(A1)),IF(COUNTIF($G:$G,ROW(A1))>0,INDEX($E:$H,MATCH(ROW(A1),$G:$G,0),COLUMN(A1)),IF(COUNTIF($H:$H,ROW(A1))>0,INDEX($E:$H,MATCH(ROW(A1),$H:$H,0),COLUMN(A1)),""))))

次にＭ1セルに次の式を入力してＰ1セルまでドラッグコピーしたのちに下方の100行目までドラッグコピーします。

=IF(COLUMN(A1)=1,ROW(A1),IF(COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)))=0,SMALL($I1:$L1,COLUMN(A1)),IF(AND(COLUMN(A1)=4,COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)-3))=0),SMALL($I1:$L1,COLUMN(A1)-3),IF(AND(COLUMN(A1)=3,COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)-2))=0),SMALL($I1:$L1,COLUMN(A1)-2),IF(AND(COLUMN(A1)=2,COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)-1))=0),SMALL($I1:$L1,COLUMN(A1)-1),IF(AND(COLUMN(A1)=2,COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)+1))=0),SMALL($I1:$L1,COLUMN(A1)+1),IF(AND(COLUMN(A1)=3,COUNTIF(L1:$M1,SMALL($I1:$L1,COLUMN(A1)+1))=0),SMALL($I1:$L1,COLUMN(A1)+1),"")))))))

これでシート2での作業は終わります。
シート1に戻ってＢ2セルには次の式を入力してＤ2セルまでドラッグコピーしたのちに下方に101行目までドラッグコピーします。

=IF($A2="","",INDEX($A$2:$A$101,INDEX(Sheet2!$M:$P,MATCH(ROW(A1),Sheet2!$M:$M,0),COLUMN(B1))-1))

これでお望みの表が出来上がります。この表はシートにデータが入力されたりしますと瞬時に組み合わせが変わってしまいます。それを避けるためにはシート1のＡ列からＤ列までを範囲として選択したのちに「コピー」し、その後に例えばＦ1セルを選択してから「形式を選択して貼り付け」で「値」にチェックをして貼り付けをします。これによって組み合わせが変わることのない表が完成します。