• ベストアンサー

エクセルにて横並びを縦並びにしたいです

横軸に複数あるデータを項目ごとに縦並びにまとめたいです。 ピボットでやろうと思っても結局最初の並びになってしまいます。 画像の下表のようにするにはどうしたらよいでしょうか。

画像を拡大する

質問者が選んだベストアンサー

  • ベストアンサー
  • aokii
  • ベストアンサー率23% (5210/22062)
回答No.1

ピボットや自動計算では難しいので、手術日と項目の列を一つにするために、元の表全体をコピーして、データの無い下の行に貼り付け、貼り付けた部分の１つ目の手術日と項目の列を削除して左方向にシフトし、2つ目の手術日と項目の列全部を完全に削除してみて下さい。

nonmimi
質問者

お礼

確かに縦に並べてしまえば、改めてピボットを使用して見やすくすることもできますね。 実際には手術日、項目が10個ぐらいになりますが、全て縦にするのも難しくはないのでこのやり方でやってみます。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. Excel（エクセル）

関連するQ&A

  • 横並びの一定の連続セルを立て並びに変えたい。

    横並びの一定の連続セルを立て並びに変えたい。 D2/E2/F2でひとつの項目があり、横並び同列にG2/H2/I2...と一定の連続セルが並んだデータがあります。これをD2/E2/F2の次の行に縦並びでD3/E3/F3として別のタブにコピーしたいのですが どうすればいいですか。一項目ずつコピペでもいいのですが、元の横並びデータが膨大なので 一発でできる方法があるのなら教えていただきたいのでよろしくお願いします。

  • Excelのピボットテーブル

    Excel2000のピボットテーブルで、ピボットテーブルで集計さらたデータ の並びを集計元のデータに合わせてたいのですが可能でしょうか。

  • (VBA) 横並びを縦並びに

    kkkkkmさん、毎回アドバイスいただき感謝します。 以下のスレッドが元になります。 https://okwave.jp/qa/q10027270.html なぜだか？私の質問スレッドが消えてしまいました。 途中で投げ出したような感じで気持ちが悪いので続けます。 以下は、最後のkkkkkmさんの回答への追加質問になります。 >LastRowNum2 = sh2.Cells(Rows.Count, 1).End(xlUp).Row >の位置がソートの前のあたりに無いと1回目(実行前のsh2にデータが無い時LastRowNum2が1のままなので)ソートしてくれませんでした。 LastRowNum2は、ソートの時のソート範囲にしか利用しないので おっしゃるようにソートの前で問題ないのですが sh2にDATAが無い状態とは マクロが実行されていない最初の状態又は SH1にDATAが無い状態でマクロを実行した時だけだと思うのですが ？ 一応、次回に備えてsh2のシート全体を初期化のため sh2.Cells.ClearContents を最初に追加しました。 >D列のソートでいいかどうか、利用者で変更してくれるといいですね。 今回はD列（項目）でソートしていますが ソートのキーとしてA,B,C,Dの4つが考えられます。 それぞれ優先順位でD-A-B-C や A-B-C-D など色々組み合わせが考えられますが これの組み合わせを網羅して利用者が選択できるようにするには 簡単では無いような気がします。 勉強のため少し考えてみますが、 考え方（ロジック）や使用すべき関数などを紹介下さい。 >Resize 確かにresizeを使用したほうが分かりやすいですね。 '------------------------------------- と「ここまで」記載した時点でスレッドが消滅してしまいました。 以下が現在のコード Option Explicit Sub Macro1() Dim sh1 As Worksheet, sh2 As Worksheet Dim LastRowNum As Long, LastRowNum2 As Long Set sh1 = Worksheets("Sheet1") Set sh2 = Worksheets("Sheet2") LastRowNum = sh1.Cells(Rows.Count, 1).End(xlUp).Row '書き出しシート(sh2)の初期化 sh2.Cells.ClearContents '見出し行 sh2.Range(sh2.Cells(1, "A"), sh2.Cells(1, "D")).Value = sh1.Range(sh1.Cells(1, "A"), sh1.Cells(1, "D")).Value '同一（ID,名前) sh2.Range(sh2.Cells(2, "A"), sh2.Cells(LastRowNum, "B")).Value = sh1.Range(sh1.Cells(2, "A"), sh1.Cells(LastRowNum, "B")).Value sh2.Range(sh2.Cells(LastRowNum + 1, "A"), sh2.Cells(2 * LastRowNum - 1, "B")).Value = sh1.Range(sh1.Cells(2, "A"), sh1.Cells(LastRowNum, "B")).Value '手術日,項目 sh2.Range(sh2.Cells(2, "C"), sh2.Cells(LastRowNum, "D")).Value = sh1.Range(sh1.Cells(2, "C"), sh1.Cells(LastRowNum, "D")).Value '手術日,項目(配置換え) sh2.Range(sh2.Cells(LastRowNum + 1, "C"), sh2.Cells(2 * LastRowNum - 1, "D")).Value = sh1.Range(sh1.Cells(2, "E"), sh1.Cells(LastRowNum, "F")).Value LastRowNum2 = sh2.Cells(Rows.Count, 1).End(xlUp).Row 'ソート sh2.Range(sh2.Cells(2, "A"), sh2.Cells(LastRowNum2, "D")).Sort key1:=sh2.Range("D1"), order1:=xlAscending, Header:=xlYes Set sh1 = Nothing Set sh2 = Nothing End Sub

  • Excel 2010　ピボットテーブル　

    Excel 2010のピボットテーブルで、複数のワークシートを選択してピボットテーブルを作成したいのですが、以前のヴァージョンでは、ピボットテーブルウィザードの1/3の「分析するデータのある場所」で「複数のワークシート範囲」を選択して作業を行っていたのですが、Excel 2010ではこの「複数のワークシート範囲」という項目がありません。 他のやり方で同じようなことができるのでしょうか。 やり方をご存知の方がいれば教えて下さい。 よろしくお願いいたします。

  • EXCEL(エクセル)の集計方法について。

    EXCEL(エクセル)の集計方法について。 仕事が進まず、大変困っています。 列Ａ～Zまでに複数の項目があります。 ピボットを使い、表を作ります。 縦にＡ～Cの項目「名称」、「型式」、「単価」をとります。 横にD～Eの項目、「受注番号」、「項」をとります。 そして、Fの項目「個数」の集計をします。 しかし横が入り切れませんでした。 「受注番号」、「項」を基準にデータを三つに分け、ピボットで作成しましたが、それでは縦の行がバラバラになってしまいます。 縦の行は全く同じものをそれぞれの表では使いたいのです。 そういう表は作れますか？なるべく関数は使いたくありません。(データが何千行とあるので重くなります) 初心者なので、説明が分かりづらく、申し訳ございません。 アドレスをお願いします。

  • 　エクセルのピボットテーブルでアイテムのグループ化ができません。

    　エクセルのピボットテーブルでアイテムのグループ化ができません。 　ピボットテーブルで集計を行い、縦軸に年月日、横軸に各アイテム毎の集計値が 集計された結果のテーブルがあります。 　ここで、横軸にあるアイテムのうち、グループ化したい任意のアイテムを選択し （コントロールキー押下による複数選択でも、隣り合うセルのドラッグ選択でも）、 ピボットテーブルツールバーよりグループと詳細の表示からグループ化を選択 するのですが、「選択対象をグループ化することはできません」とのエラーメッセージ ウィンドウが表示され、うまくいきません。 　日付のグループ化をする際など、空白セルがあるとうまくいかないことがあることは 知っているのですが、私のデータでは空白はありません。 　縦軸の日付にも横軸のアイテムにも空白はありませんし、集計結果にも空白は一切 ありません。 　にもかかわらずうまくいきません。 　参考書（例：「いちばんやさしいExcelピボットテーブル」（秀和システム出版）」のp.118） などでも、アイテムのグループ化ができることになっていますが、これがうまくいかない ものです。 　出版社にも問合せましたが、ユーザのデータでうまくいかないことに対するサポート は、出版社としての範疇外との回答のみで、困ってしまいました。 　どなたか教えていただけませんでしょうか？ 　よろしくお願いします。 以上

  • Excel　ピボットテーブルの作成に関して

    エクセルでピボットテーブルを作成する際の質問です． 「ピボットテーブルのフィールドリスト」から 項目をピボットテーブルレポートにドラッグしますが， この時，集計の方法を「合計」にしたいのに，時々「データの個数」となります． ドラッグし終わってから，ドラッグした項目を一つ一つ 「右クリック→フィールドの設定→「データの個数」を「合計」に訂正」の過程で 直していかなければならないのが，非常に面倒で苦痛です． 設定を変えて，最初から目的の集計方法を 表示させる（上の場合，最初から「合計」がでる）など，何かよい方法はありませんでしょうか？

  • エクセルデータをワードで差し込み印刷

    お世話になります。 図のようなデータをワードで差し込み印刷したいのですが「期」のデータが縦並びのためうまくいきません。 ピボットテーブルを作成して差し込み印刷を試みましたが、差し込みフィールド名が「F1」から「F250」と表示されるためうまく挿入できません。 アドバイスをお願いします。

  • エクセルのデータ統合機能について

    Excel2003で複数の表のデータを統合したときに、統合された表の項目の並びはどういう基準で表示されるのか知りたいのですが？ご存知の方教えて下さい。

  • エクセル2007で質問です。

    エクセル2007で質問です。 仕事でテーブルを使い年度ごとにデータをまとめています。 データを5年分まとめることになったので、1つの年度のテーブルに他の年度をコピー、貼り付けでくっつけていったのですが計算式がうまくいかず、テーブルを1つにできません。 まとめることができれば、ピボットテーブルで集計をしたいと考えています。 複数のテーブルを1つのテーブルにまとめることはできないのでしょうか？ 年度ごとで項目ごとに使っている関数は同じです。 よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する