Excelで動的な棒グラフレース（バーチャートレース）をアニメーション化する方法｜ステップバイステップガイド

アニメーション棒グラフレース（バーチャートレース）とは？

棒グラフレースとは、時系列データをアニメーション付きの棒グラフとして表示することで、時間の経過に伴うデータの大きな変化を視覚的に表現できるグラフ形式です。統計データを斬新で魅力的、かつ分かりやすい形で提示することができます。

Excelでアニメーション棒グラフレースを作成する手順

この記事では、Excelで動的な棒グラフレースを作成するために必要な4つのステップを解説します。まずデータセットを構築し、次にそのデータを棒グラフにプロットします。最後に、VBAコードでマクロを作成し、ボタンに割り当ててグラフのアニメーションを開始できるようにします。

ステップ1：データモデルの準備

使用するデータセットは、2020年と2021年の月別売上を示したもので、「月」「売上(2020)」「売上(2021)」の3列で構成されています。

• 範囲 C4:D16 を選択します。
• Ctrl+C を押してコピーします。

• 範囲 E4:F16 を選択します。
• Ctrl+V を押して貼り付けます。

これでデータモデルは以下のようになります。

ステップ2：グラフ用データの作成

データを棒グラフにプロットするには、さらに2列が必要です。両方の「売上」列をコピーし、データセットの隣に貼り付けます。その後、前のステップで作成した列を使ってグラフを作成します。ここでは集合横棒グラフ（Clustered Bar Chart）を使用します。

• 挿入タブに移動します。
• グラフグループにある縦棒または横棒グラフの挿入アイコンをクリックします。

• 2-D横棒セクションから集合横棒アイコンをクリックします。

以下のような空のグラフが表示されます。

• グラフ上の任意の場所をクリックし、グラフデザインタブ→データの選択に進みます。

データソースの選択ウィンドウが開きます。

• 「シート名＋感嘆符（!）＋範囲」の順に入力します。

複数の範囲を指定する場合は、範囲同士をカンマで区切ることが重要です。

• 凡例項目セクションの追加アイコンをクリックします。

系列の編集ウィンドウが開きます。

• 上述の適切な構文に従って、列 E の系列名と系列値を入力します。
• OKをクリックします。

• 列 F についても同じ操作を繰り返し、OKをクリックします。

• データソースの選択ウィンドウに戻ります。
• 横（項目）軸ラベルの編集を選択します。
• OKをクリックします。

軸ラベルウィンドウが開きます。

• ボックスに列 B の範囲を入力し、OKをクリックします。

これでグラフがデータモデルからデータを取得します。

• プラス（+）アイコンをクリックし、このデモでは軸、グラフタイトル、目盛線、凡例にチェックを入れます。

関連記事：Excelでアニメーショングラフを作成する方法

ステップ3：アニメーション棒グラフレース用のマクロを作成する

次に、データをアニメーションとして表示するためのVBAコードを記述します。DynamicChartという名前のプロシージャを宣言します。これは、一定の遅延を挟みながら C 列と D 列からグラフ用のデータを取得し、E 列と F 列へ順番に転記することでアニメーション効果を実現するものです。

• 開発タブに移動します。
• Visual Basicをクリックします。

• 挿入→標準モジュールを選択します。

• モジュールに以下のコードを入力します。

Sub DynamicChart()
    Const StartRange As Long = 5
    Dim LastRange As Long
    Dim RangeNo As Long
    LastRange = Range("C" & StartRange).End(xlDown).Row
    Range("E" & StartRange, "F" & LastRange).ClearContents
    DoEvents
    Application.Wait (Now + TimeValue("00:00:1"))
    For RangeNo = StartRange To LastRange
        DoEvents
        Range("E" & RangeNo, "F" & RangeNo).Value = Range("C" & RangeNo, "D" & RangeNo).Value
        Application.Wait (Now + TimeValue("00:00:1"))
        DoEvents
    Next RangeNo
End Sub

• 保存アイコンをクリックします。

ステップ4：マクロを割り当てるボタンを作成する

最後に、この仕組みをより使いやすくするために、STARTボタンを作成し、先ほど作成したマクロを割り当てます。

• 開発タブ→挿入に移動します。

• データモデルとグラフの間のスペースに、四角形のボタンを描画します。

マクロの登録ウィンドウが表示されます。

• マクロ（この場合はDynamicChart）を選択し、OKをクリックします。

• ボタンを選択して名前を変更します。ここではSTARTとします。
• テキストを選択した状態でホームタブに移動します。
• フォントグループから太字を選択し、フォントサイズを20に設定します。

完成したボタンは以下のようになります。

• STARTボタンをクリックすると、以下のようにアニメーションが実行されます。

関連記事：Excelでテキストをアニメーション化する方法

練習用ワークブックのダウンロード

関連記事

• Excelで3Dアニメーションを作成する方法

解答付きの無料・高度なExcel演習問題を今すぐゲット！