シートにテーブルを作成するとき、ほとんどの Excel ユーザーがまず自分の快適さと利便性について考えるのは秘密ではありません。 これが、複雑な「ヘッダー」を備えた美しくカラフルで扱いにくいテーブルが生まれる方法であり、同時に、フィルター処理や並べ替えがまったくできないため、ピボット テーブルを使用した自動レポートについてはまったく考えない方がよいでしょう。
遅かれ早かれ、そのようなテーブルのユーザーは「それほど美しくはないかもしれませんが、機能する可能性がある」という結論に達し、テーブルのデザインを簡素化し始め、古典的な推奨事項に合わせます。
- 各列に独自の一意の名前 (フィールド名) がある単純な XNUMX 行のヘッダー
- XNUMX 行 – 完了した XNUMX つの操作 (取引、販売、転記、プロジェクトなど)
- 結合セルなし
- 空の行と列の形で途切れることなく
ただし、複数レベルのヘッダーから XNUMX 行のヘッダーを作成したり、XNUMX つの列を複数の列に分割したりする場合は、非常に単純であり、テーブルの再構築に多くの時間がかかる可能性があります (特にサイズが大きい場合)。 次の状況を意味します。
| Of |  | do |  |
データベースに関しては、通常、右側のテーブルはフラット (フラット) と呼ばれます。そのようなテーブルに従って、ピボット テーブル (ピボット テーブル) のレポートを作成し、分析を行うのが最適です。
簡単なマクロを使用して、XNUMX 次元のテーブルをフラットなテーブルに変換できます。 タブから Visual Basic Editor を開きます 開発者 – Visual Basic (開発者 — Visual Basic エディター) またはキーボードショートカット 他の+F11. 新しいモジュールを挿入します (インサート – モジュール）、このマクロのテキストをそこにコピーします。
Sub Redesigner() Dim i As Long Dim hc As Integer, hr As Integer Dim ns As Worksheet hr = InputBox("Сколько строк с подписями сверху?") hc = InputBox("Сколько столбцов с подписями слева?") Application.ScreenUpdating = False i = 1 セット inpdata = セレクション セット ns = Worksheets.Add r = (hr + 1) の場合 inpdata.Rows.Count へ c = (hc + 1) の場合 inpdata.Columns.Count へ j = 1 の場合 hc ns へ。 Cells(i, j) = inpdata.Cells(r, j) 次の j For k = 1 To hr ns.Cells(i, j + k - 1) = inpdata.Cells(k, c) 次の k ns.Cells( i, j + k - 1) = inpdata.Cells(r, c) i = i + 1 Next c Next r End Sub その後、VBA エディターを閉じて、Excel に戻ることができます。 これで、元のテーブル (ヘッダーと最初の列に月を含む) を選択して、マクロを実行できます。 開発者 – マクロ (開発者 — マクロ) またはプレスコンビネーション 他の+F8.
マクロはブックに新しいシートを挿入し、その上に選択した表の新しい再構築バージョンを作成します。 大きなリストを処理および分析するためのExcelツールのすべての武器を使用して、そのようなテーブルを「完全に」操作できます。
- マクロとは、VBA でマクロ コードを挿入する場所、使用方法
- ピボットテーブルを使用したレポートの作成
- PLEXアドオンから１Dテーブルをフラットテーブルにリデザインするツール