エクセルでID番号を保持したまま横並びのデータを縦の一本のデータにしたい

1000名の対象者に、それぞれ5問の質問を行い、Yesだった解答を１と入力したデータを持っています。対象者は、1問だけ回答した人から、5問すべてに回答した人までいます。

このデータをID番号と質問の番号を保持したまま、エクセルで横並びのデータを縦の一本のデータにしたいと思っています。

例えば下の画像のように《Before》の並びを、《After》のような一列の並びに一度に整列することは可能でしょうか。
手作業では困難と判断し質問させていただきました。
なにかいい方法があれば回答お待ちしております。

宜しくお願いします。

No.3 回答者： fujillin 回答日時： 2023/09/30 11:15

こんにちは

マクロを利用したほうが簡単だと思いますけれど、以下は関数で行う例です。

添付の図では行、列番号が不明なので、「before」とあるのがＡ1セル、「after」とあるのがA10セルと仮定しました。
また、（その仮定で）C11セルに、「解答回数」のタイトルがありますが、回数ではなく2行目の質問番号の意味だと勝手に別解釈しました。

ご提示のレイアウトで、
A12セルに
=IFERROR(INDEX(A:A,INT(AGGREGATE(15,6,(ROW(B$3:F$8)*10+COLUMN(B$3:F$8))/(B$3:F$8<>""),ROW(A1))/10)),"")

B12セルに
=IFERROR(INDEX(A:F,INT(AGGREGATE(15,6,(ROW(B$3:F$8)*10+COLUMN(B$3:F$8))/(B$3:F$8<>""),ROW(A1))/10),MOD(AGGREGATE(15,6,(ROW(B$3:F$8)*10+COLUMN(B$3:F$8))/(B$3:F$8<>""),ROW(A1)),10)),"")

C12セルに
=IFERROR(INDEX($2:$2,MOD(AGGREGATE(15,6,(ROW(B$3:F$8)*10+COLUMN(B$3:F$8))/(B$3:F$8<>""),ROW(A1)),10)),"")

の式をそれぞれ入力し、A12:C12をまとめて下方にフィルコピーすれば実現できると思います。

この回答へのお礼

ありがとうございます！大量のデータでもすぐ応用できました。

お礼日時：2023/09/30 16:10

No.2 回答者： little_experience000 回答日時： 2023/09/30 09:57

画像の例で数式を書きます。

H,I列は計算用です（印刷時は白文字にしてください）

B13
=INDIRECT("B"&H13)
下にコピー

C13
=INDEX($C$3:$G$8,H13-2,D13)
下にコピー

D13
1
D14
=IF(B13=B14,D13+1,1)
下にコピー

H13
3
H14
=H13+I13
下にコピー

I13
=IF(COUNTA(INDIRECT("C"&H13&":G"&H13))=COUNTIF($H$13:H13,H13),1,0)
下にコピー

ですか

この回答へのお礼

早速のご回答ありがとうございます！シンプルなものでわかりやすく助かりました。

お礼日時：2023/09/30 16:11

No.1 回答者： little_experience000 回答日時： 2023/09/30 09:34

可能です。

画像例で数式を書きます。
H,I列は計算列です（印刷時には文字を白にします）

I13
=IF(COUNTA(INDIRECT("C"&H13&":G"&H13))>COUNTIF($H$13:H13,H13),0,1)
下にコピー

H13
3
H14
=H13+I13
下にコピー

B13
=INDIRECT("B"&H13)
下にコピー

C13
=INDEX($C$3:$G$8,H13-2,D13)
下にコピー

D13
1
D14
=IF(B13=B14,D13+1,1)
下にコピー

ですか