データを拾い出す関数

質問

エクセル２０００で以下のシートがあります。
Ａさん｜犬｜猫｜魚｜鳥｜
Ｂさん｜
Ｃさん｜猫｜鳥｜

これを別のシートに下のように組み替えたいです。
犬｜Ａさん｜
猫｜Ａさん｜Ｃさん｜
魚｜Ａさん｜
鳥｜Ａさん｜Ｃさん｜

飼い主は１００人、ペットは全部で５００種類。一番の飼い主は３０種です。ペットを縦軸にした表は作りました。

よろしくお願いします。

回答No.1

maron--5 · ベストアンサー

◆Sheet2のB1の式
B1=IF(COLUMN(A1)>COUNTIF(Sheet1!$B$1:$E$10,$A1),"",INDEX(Sheet1!$A$1:$A$10,SMALL(INDEX(((MMULT((Sheet1!$B$1:$E$10=$A1)*1,ROW($1:$4)))=0)*10^5+ROW($A$1:$A$10),),COLUMN(A1))))
★右と下にコピー

お礼

苦労して式を改造しようとしてますがうまく出来ないです。

シート１に該当する部分の範囲
A1:BC93
シート２の「見出し列」の範囲
A1:A773

以上から式をもう一度教えていただけないでしょうか？

ご苦労おかけしますが、よろしくお願いいたします。