エクセル 規則的に行を列に変換

エクセルでA列にある１，２，３と連続してあるデーターで、B列に２，C列３を一気に入れる方法はあるのでしょうか？かなりのデーター数があるので、一気にできる方法があれば。。。と思い、お願いします。

No.3 ベストアンサー 回答者： 銀鱗 回答日時： 2021/06/22 15:44

一気にはできないよ。

一つずつ条件を考えて仕組みを作るしかない。

条件を考えよう。
まずは、1行目に表示するための条件。
1行目のA列が「1」で2行目のA列が「2」なら1行目のB列に「2」
1行目のB列が「2」で3行目のA列が「3」なら1行目のC列に「3」
3までならここまでで良い。必要な数だけ条件を書き出そう。

つぎに、削除するための条件。（行列を入れ替えて表示って事だから当然削除するんだろ？）
1行目のB列が「2」なら、2行目のB列に ”削除” の文字を表示。
1行目のC列が「3」なら、3行目のC列に ”削除” の文字を表示。
3までならここまでで良い。

この条件を基にB1セル、C1セル、D2セルに数式を入れる。
B1セルには
　＝IF(AND(A1=1,A2=2),2,"")
C1セルには
　＝IF(AND(B1=2,A3=3),2,"")
必要な行までそれぞれセルを複製。

D2セルには、
　＝IF(AND(A2=2,B1=2),"削除","")
さらにD3セルには、
　　IF(AND(A3=3,C1=3),"削除","")
の条件が追加され、
　＝IF(AND(A2=2,B1=2),"削除",IF(AND(A3=3,C1=3),"削除",""))
そして必要な行までD3セルを複製。

表全体をコピーして、そのままその範囲に「値として貼り付け」
オートフィルタを設定してD列に ”削除” がある行だけを表示。
表示された行を削除。
オートフィルタを解除。

……のような面倒な仕組みを作って手作業で終わらせる。

・・・

そんなわけで、1000行とか2000行程度なら、
　【手作業でやった方が断然早い】
という事になる。

面倒だと思うだろ？
ところがどっこい、簡単なんだ。
昨日の繰り返し呼び出し機能を使えばとっても楽。

まずはNo.1の回答者さんの方法を試みましょう。
なおここで、「行列を入れ替えて貼り付け」を1回やったら、
次の範囲を指定しコピーしたら、貼り付ける位置を指定して
　Ctrl+Y
で「行列を入れ替えて貼り付け」を繰り返すことができる。
　※別の機能を使うと次からは
　　その機能が繰り返し使われることになる。
すべて行列を入れ替えて貼り付け終わったら2以上続いた行を選択して削除すれば良い。
この時も削除を Ctrl+Y で「行削除」を繰り返せば楽。

いや、マジで1000行程度なら5分もかからないぞ。

この回答へのお礼

ありがとうございます。ただ、CTRL=Yとすると直前の作業（＝範囲も同じ）となってしまい、うまくいきませんが、工夫してやってみます。

お礼日時：2021/06/22 21:45

No.4 回答者： goomania 回答日時： 2021/06/22 19:31

よく使われる方法としてはNo.1さんの回答にあるように、対象範囲を選択してコピーし、「形式を選択して貼り付け」から「行と列を入れ替える」にチェックをいれて貼り付けるという方法があります。

これで元データの行と列を入れ替えたデータが生成されます。
また、これを関数で実現する方法もあります。
sheet1に元データがあり、その範囲が仮に100行50列つまりA1～AX100までのデータだとした場合、sheet2のA1～CV50までつまり、50行100列を選択した上で、sheet2のA1セルに
=TRANSPOSE(A1:AX100)
を記述し、Ctrl+Shift+Enterで確定して、配列数式とします。
すると、sheet1の内容が行と列を入替てsheet2に表示されるはずです。

No.2 回答者： mike_g 回答日時： 2021/06/22 14:58

》 A列にある１，２，３と連続してあるデーター

Ａ列に上から 1、2、3、4、5、6、…と連続データが？
Ａ列に上から 1、2、3、1、2、3、…と(繰返し)連続データが？
誤解がないように、お絵描きサンプル表で示してください、B列，C列への結果もネ

No.1 回答者： nantokanaru 回答日時： 2021/06/22 14:35

１．表を範囲選択、コピーをします。

２．貼り付けたいセルを選択し、
　　[形式を選択して貼り付け]を選択し、
　　[行列を入れ替える]にチェックを入れ
　　[ＯＫ]ボタンをクリックします。


「エクセル　行と列を入れ替える」

で検索した結果、出てきた方法です。

試してみてください。