...となれば煩雑です。VBAによる,複数件の,かつ24ヵ月分のデータにもとづくZチャートを自動的に作成する一例です。コードの冗長性排除・エラー対策等はしていません。元データとして,次のような形式の表(24ヵ月分のデータ)を対象とします(このマクロでは必須の形式です)。日々の取引履歴データから「日付」・「(販売)担当者コード(または担当者名・商品コード・商品名など)」・「金額」について抽出した,セルA1からはじまるリスト形式の表です(1行目は必ず見出しとします)。免責および特記事項このマクロはあくまでZチャート一括作成のデモンストレーションです。実際にご利用いただく場合,お手持ちのデータで従前の方法にて正確に作成したものと内容を照合して,おかしな点が出現しないかどうかを安全な環境で十分に確認してください。精度不足あるいは予期しないデータ消失等のトラブルにつきまして,筆者は一切責任を負いかねます。マクロの動作自体の検証(お使いの環境で正常に動作するか,あるいは処理にどの程度の時間がかかるかといったことの確認)には,このサンプルデータをエクセルにコピペしてお使いください。3000のレコード,32担当者分の検証用データです。万一動作中に固まった場合は,[Ctrl]キー+[Pause/Break]キーをお試しください。元データとして数百~数千件のレコード数を想定しています。筆者の環境ではレコード数5000,担当者コード数50まで正常に動作することを確認していますが,処理時間はデータ量に比例して長くなります。Editor)の起動(1)まず,元データとなるシートをアクティブにしておきます。このシートをアクティブな状態にしておいてください。Basicボタンをクリックします。Editor)の起動(2)VBEが起動しました。3VBEの操作・VBAコードの導入(1)VBEの挿入メニュー標準モジュールをクリックします。「標準モジュール」ウインドウ「標準モジュール」ウインドウが表示されました。次のコードをすべて選択し,コピーします。VBA」で掲載する形式で個人別にZチャートを作成するマクロです。元表は掲載の表と同じ体裁を整えている必要があります。詳細は当該ページ(http://bdastyle.net/tools/z-chart/page1.html)をご覧ください。&quot;実行時エラーが発生しました。&quot;実行時エラーが発生しました。コードの貼り付け「標準モジュール」ウインドウにコードを貼り付けます。7VBEの操作・VBAコードの導入(5)閉じるボタンをクリックしてVBEを閉じます。“AdjustList”開発タブ「コード」グループのマクロボタンをクリックします。“AdjustList”「マクロ」ダイアログが表示されます。「マクロ名」に2つのマクロが表示されています。ここでは「AdjustList」の方を選択して,実行ボタンをクリックします。“AdjustList”マクロ「AdjustList」の処理が始まります。データ数に応じて,しばらく処理時間がかかる場合があります。処理が終わると,元のシートが右方にコピーされ,「年-月」というデータ列が作成されます。このとき,シート名は自動で「ピボット表作成シート」とされます。11ピボット表の作成(1)挿入タブ「テーブル」グループのピボットテーブルボタンをクリックします。12ピボット表の作成(2)「ピボットテーブルの作成」ダイアログが表示されます。ピボットテーブルを配置する場所が「新規ワークシート」になっていることを確認して,OKボタンをクリックします。13ピボット表の作成(3)あたらしいシートにピボット表が作成されます。フィールドリストから,「年-月」を「行ラベル」枠内に,「担当者コード」を「列ラベル」枠内に,そして「金額」を「値」枠内にドラッグ&ドロップします。“CreateMultiZchart”念のため,ピボット表がアクティブな状態になっているか確認します。開発タブ「コード」グループのマクロボタンをクリックします。“CreateMultiZchart”「マクロ」ダイアログが表示されます。「マクロ名」に2つのマクロが表示されています。今度は「CreateMultiZchart」の方を選択して,実行ボタンをクリックします。16Zチャートの一括作成・完了マクロ「CreateMultiZchart」の処理が始まります。データ数に応じて,しばらく処理時間がかかる場合があります。項目ごとにグラフシート(Zチャート)を作成という処理を順におこないます。完成したブックの,シート群左サイドの色のついてないシートがZチャートの元表で,同右サイドの赤い色のシートがZチャートです。その他の参照このサイトの関連How-toです。セグメントの振り分けマクロメインサイト「ひとりマーケティングのためのデータ分析」の関連How-toです。