エクセルでの行列の入換え

質問

エクセルの表で
Ａ　Ｂ　　　　Ｃ
１　970701　○○
１　001001　△△
１　010801　××
２　980701　●●
２　021001　☆☆

となってる表を

Ａ　Ｂ　　　　　Ｃ　　　Ｄ　　　Ｅ　　　　Ｆ　　　Ｇ　
１　970701　○○　001001　△△　010801　×××
２　980701　●●　021001　☆☆
と入換えたいです。

Ａのセルは社員番号で、3行もあれば、10行もあります。

行列を入換えて貼り付けていったのですが、
もっと簡単な方法がありますでしょうか？
よろしくお願いします。

回答No.1

Raistlin · ベストアンサー

提示の例はA列～のデータをA列～に並べ替えるようになっていますが、式が複雑になりますので、A1から始まるデータを、一旦D1から始まるデータに並べ替えることとします。

D1から下方向に社員番号を入力した後、E1に以下の式を入力してください。
=IF(INDEX($A$1:$C$5,MATCH($D1,$A$1:$A$5,0)+(COLUMN()/2-2.5),1)=$D1,INDEX($A$1:$C$5,MATCH($D1,$A$1:$A$5,0)+(COLUMN()/2-2.5),3-MOD(COLUMN(),2)),"")

その後E1をコピーし、必要な数だけ右方向および下方向に貼り付けてください。

エラー値が一部でますので、それを省いて終了です。

お礼

御礼が遅くなりもうし訳ありませんでした。
無事データをまとめることが出来ました。
ありがとうございました！