- ベストアンサー
Excel2007のセルの並べ替え
- Excel2007を使って、変則的なセルの並べ替えを一括で行いたい場合の方法を教えてください。
- Excel2007で、表が横に連続的に並ぶような変則的な並び方を一括で移動する方法を教えてください。
- Excel2007のセルをsheet1からsheet2に変則的に並べ替える方法を教えてください。手っ取り早い方法を教えてください。
- みんなの回答 (4)
- 専門家の回答
質問者が選んだベストアンサー
シート1ではA列からG列まで1行目から下方にお示しのデータがあるとします。 シート2ではA1セルに次の式を入力して下方にオートフィルドラッグします。 =IF(ROW(A1)>COUNTA(Sheet1!A:A)*6,"",INDEX(Sheet1!$A:$G,ROUNDUP(ROW(A1)/6,0),IF((MOD(ROW(A1)-1,6)+1)=6,7,MOD(ROW(A1)-1,6)+1))) B1セルには次の式を入力して下方にオートフィルドラッグします。 =IF(ROW(A1)>COUNTA(Sheet1!A:A)*6,"",IF(MOD(ROW(A1)-1,6)+1=5,INDEX(Sheet1!$F:$F,MATCH(A1,Sheet1!$E:$E,0)),""))
その他の回答 (3)
- MackyNo1
- ベストアンサー率53% (1521/2850)
元データがSheet1にあるなら、新規シートのA1セルに「=INDEX(Sheet1!$A$1:$G$100,INT((ROW(A1)-1)/7)+1,MOD(ROW(A1)-1,7)+1)」 を入力して下方向にオートフィルコピーします。 次に、B5セルに「=A6」、C6セルに「1」と入力し、A1:C7セルを選択し、下方向にオートフィルコピーし、そのまま右クリック「コピー」もう一度右クリック「形式を選択して貼り付け」で「値」を選択します。 最後に「データ」「フィルタ」でC列で「空白以外」を選択しA列のデータをDeleteで削除し、そのまま右クリックから「行の削除」をしてフィルタモードを解除すれば、ご希望のデータになっています。
お礼
最後の部分が、ちょっと迷いましたができました。 ありがとうございました。
- mu2011
- ベストアンサー率38% (1910/4994)
NO1です。 エクセル2007の置換は、ホームタブ→検索と選択→置換でしたので訂正します。
お礼
オートフィルっていうんですかね? セルを選択したままドラッグすると数値が進みながらコピーされていくという機能。 これのON・OFFは、どこにあるのでしょうか? 多分、そのせいでできなかったのだと思うのですが。 とりあえず、できました。 ありがとうございました。
補足
すみません、下の回答の捕捉ですが、 A1に#sheet1!A1、A2に#sheet1!B1、A3に#sheet1!C1、A4に#sheet1!D1、A5に#sheet1!E1、B5に#sheet1!F1、A6に#sheet1!G1 が繰り返されてしまい・・・ ではなく、 A7に#sheet1!A1、A8に#sheet1!B1、A9に#sheet1!C1、A10に#sheet1!D1、A11に#sheet1!E1、B11に#sheet1!F1、A12に#sheet1!G1 が繰り返されてしまい・・・ です。 下に向かって6行分のコピーはできています。 ただ、行番号が進まずにコピーされてしまうので、1行目が何度も繰り返されるだけの状況です。
- mu2011
- ベストアンサー率38% (1910/4994)
一例です。 (1)sheet2のA1に#sheet1!A1、A2に#sheet1!B1、A3に#sheet1!C1、A4に#sheet1!D1、A5に#sheet1!E1、B5に#sheet1!F1、A6に#sheet1!G1を入力 (2)A1:B6を選択して必要分下方向にコピー (3)コピー範囲を選択→編集→置換で#を=で全て変換
お礼
別のPCでやってみたらできました。 どこが問題だったのか判りませんが・・・(汗) ありがとうございました。
補足
早速のご回答ありがとうございます。 やってみたのですが、 (2)A1:B6を選択して必要分下方向にコピー このときに、以降も A1に#sheet1!A1、A2に#sheet1!B1、A3に#sheet1!C1、A4に#sheet1!D1、A5に#sheet1!E1、B5に#sheet1!F1、A6に#sheet1!G1 が繰り返されてしまい、行番号が進んでいきません。 どこが違うのでしょうか?
お礼
関数の内容はさっぱり判りませんが(汗)、このままコピペでできました。 ありがとうございました!