クロス集計表（2次元表）をExcelでリストに変換するにはどうすればよいですか？
Microsoft Excelでクロステーブル（XNUMX次元テーブル）をリストテーブル（XNUMX次元テーブル）に変換する方法を知っていますか？ いくつかの理由で、Excelでテーブル（行見出しと列見出しを含む）をフラットリストに変換する必要がある場合があります。 次のトリックは、クロステーブルをフラットリストに簡単かつ迅速に変換するのに役立ちます。
クロステーブルがあり、次のようにリストに変換する必要があるとします。
 |
|
 |
| クロステーブル（行見出しと列見出し付き） | リストテーブル（XNUMX次元テーブル） |
クロステーブルをVBAを使用してExcelのリストに変換する
次のVBAマクロは、アクティブなワークシート内のすべてのクロステーブルをフラットリストにすばやく変換するのに役立ちます。
ステップ1： 他の + F11 Excelでキーを押すと、Microsoft Visual Basic forApplicationsウィンドウが開きます。
ステップ2：クリック インセット > モジュール、モジュールウィンドウに次のマクロを貼り付けます。
リストする転置クロス集計テーブルのVBA：
Sub ConvertTableToList（）
Const TEST_COLUMN As String = "A"
Dim i As Long、j As Long
Dim iLastRow As Long
薄暗いiLastCol
Application.ScreenUpdating = False
ActiveSheetを使用
iLastRow = .Cells（.Rows.Count、TEST_COLUMN）.End（xlUp）.Row
i = iLastRow To2ステップ-1の場合
iLastCol = .Cells（i、.Columns.Count）.End（xlToLeft）.Column
j = iLastCol To 3 Step-1の場合
.Rows（i + 1）.Insert
.Cells（i + 1、2）.Value = .Cells（i、j）.Value
.Cells（i、j）.Value = ""
次のj
私は次の
.Rows（1）.Delete
最後に
Application.ScreenUpdating = True
End Subの
ステップ3： F5 このマクロを実行するためのキー。
次に、変換されたリストが次のスクリーンショットのように表示されます。
注：
1.このVBAマクロは、ヘッダーなどの元のテーブルの一部のデータを失います。 この場合、ヘッダー（Name、Grade、およびClass）は失われます。
2.必要に応じて、As String = "A"を変更できます。 たとえば、クロステーブルが列Eに記載されている場合は、代わりに「A」の「E」を使用する必要があります。
3.また、ワークシートに他のデータがある場合、クロステーブルを変換した後にリストのデータが間違っていることがあります。
Kutools forExcelを使用してクロステーブルをExcelのリストに変換する
あなたが持っている場合 Kutools for Excel インストールすると、使用できます 転置テーブルの寸法 クロステーブルをフラットリストにすばやく変換するツール。
Kutools for Excel 300以上の便利なExcelツールが含まれています。 30日以内に制限なしで無料でお試しいただけます。 今すぐ入手.
ステップ1：リストに変換するテーブルを選択します。
ステップ2： クツール >修正します > 転置テーブルの次元。 次のスクリーンショットを参照してください。
手順3：[テーブルの寸法を転置]ダイアログボックスで、[ リストするクロステーブル オプションを選択し、 結果の範囲 クリックして 
ステップ4：クリック OK
次に、次のスクリーンショットのように、元のテーブルがフラットリストに変換されていることがわかります。
転置テーブルの寸法 リストをクロス集計表に変換することもできます。 詳細については、にアクセスしてください。 転置テーブルの寸法.
関連記事：
最高のオフィス生産性向上ツール
| 🤖 | Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行 | コードを生成 | カスタム数式の作成 | データを分析してグラフを生成する | Kutools関数を呼び出す... |
| 人気の機能: 重複を検索、強調表示、または識別する | 空白行を削除する | データを失わずに列またはセルを結合する | 数式なしのラウンド ... | |
| スーパールックアップ: 複数の基準の VLookup | 複数の値の VLookup | 複数のシートにわたる VLookup | ファジールックアップ .... | |
| 詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する | 依存関係のドロップダウン リスト | 複数選択のドロップダウンリスト .... | |
| 列マネージャー: 特定の数の列を追加する | 列の移動 | Toggle 非表示列の表示ステータス | 範囲と列の比較 ... | |
| 注目の機能: グリッドフォーカス | デザインビュー | ビッグフォーミュラバー | ワークブックとシートマネージャー | リソースライブラリ (自動テキスト) | 日付ピッカー | ワークシートを組み合わせる | セルの暗号化/復号化 | リストごとにメールを送信する | スーパーフィルター | 特殊フィルター (太字/斜体/取り消し線をフィルター...) ... | |
| 上位 15 のツールセット: 12 テキスト ツール (テキストを追加, 文字を削除する、...） | 50+ チャート 種類 (ガントチャート、...） | 40+ 実用的 式 (誕生日に基づいて年齢を計算する、...） | 19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...） | 12 変換 ツール (数字から言葉へ, 通貨の換算、...） | 7 マージ＆スプリット ツール (高度な結合行, 分割セル、...） | ... もっと |
Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。 最も必要な機能を入手するにはここをクリックしてください...
Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作業をはるかに簡単にします
- Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
- 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
- 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
