Excel でグラフに水平な平均線を追加するには、どうすればよいですか？

グラフ上にデータの平均値を水平線として視覚的に示すには、まずExcel の組み込み関数で平均値を計算し、その結果を既存のグラフに追加します。この方法は、平均値をオーバーレイとして明確に表示したい縦棒グラフ、横棒グラフ、または折れ線グラフに最適です。

1．まず、データセットの平均を計算します。補助列（たとえば列 C）のセル C2 に、次の数式を入力してください。=AVERAGE($B$2:$B$8)。この数式は、B2 から B8 までの範囲にあるすべての値の平均を計算します。次に、オートフィルハンドルを使ってこの数式をデータ範囲の最終行までドラッグします。これにより、各行に同じ平均値が表示され、グラフ上に水平線が形成されます。

ヒント：数式内の範囲が関連するデータすべてを含んでいるか、再度ご確認ください。データセットがより大きかったり、別の列にある場合は、誤った平均値を防ぐため、セル参照を適宜調整してください。

2．元のデータと補助列を選択した状態で、挿入タブに移動し、分析に最も適したグラフの種類（たとえば2-D 縦棒グラフ）を選択します。データと平均系列の両方がプロットされ、カスタマイズされたグラフの土台が整います。

3．グラフを挿入すると、通常は元のデータの隣に別シリーズとして平均系列（多くの場合、赤色のバー）がプロットされます。これらのバーのいずれかをクリックして平均系列全体を選択し、右クリックしてコンテキストメニューから系列のグラフの種類の変更を選択します。

4．グラフの種類の変更ダイアログボックスが表示されます。左側のパネルでコンボグラフの種類を選択し、その後、平均系列のドロップダウンメニューから折れ線グラフのスタイルを選びます。これにより、平均系列がバーから直線の水平線に変わり、グラフ上で平均値がより視覚的に際立つようになります。

ヒント：意図しない限り、データ系列のグラフの種類を誤って折れ線に変更しないようにご注意ください。変更してしまうと、グラフの表示が変わってしまいます。

5．OKをクリックします。これで、グラフのデータ列全体にわたって水平な平均線が表示され、迅速な比較の基準点として役立ちます。

適用可能なシナリオ：この方法は、完全に動的なソリューションをお求めの際に最適です。データセットを更新すれば、平均値とグラフも自動的に更新されます。手動での設定は必要ですが、アドインやコードは一切不要です。

メリット：Excel の組み込みツールとして動作し、データを変更すると自動で更新され、さらに高度なカスタマイズも可能です。

制限事項：非常に大きなデータセットや複数の系列を扱う際には、やや手間がかかる場合があります。また、より複雑なデータ構造では、数式やグラフの選択を調整する必要が生じることもあります。

トラブルシューティング：平均線が期待通りに表示されない場合は、まず数式の範囲を確認し、グラフ作成前にデータ列と平均列の両方が選択されていることをご確認ください。また、グラフの種類を変更する際は、必ずコンボチャートダイアログ内にいることを確認してください。

平均線やその他の参照マーカーを日常的に追加する必要があるなら、チャートに行を挿入機能をKutools for Excelで活用するのが特に効果的です。このツールを使えば、手順が大幅に簡略化され、数式を手動で設定する手間も省けます。すでにグラフを作成済みの場合でも、Kutools ならわずか数回のクリックと最小限の設定で、すぐに平均線を追加できます。

下のスクリーンショットのように標準的な縦棒グラフを作成済みで、データポイントの平均をすばやく示したいとします。

1．グラフをクリックして選択し、次にKutools>グラフ>チャートに行を挿入へ移動します。すると、機能のダイアログが起動します。

2．ダイアログボックス内で平均オプションにチェックを入れて、OKをクリックします。

これで縦棒グラフに即座に水平な平均線が表示され、分析結果の提示やデータの視覚的比較が容易になります。

適用可能なシナリオ：この方法は、多数のグラフを扱う方や、手間をかけずにスピーディーに処理したい方に最適です。特にプレゼンテーションやダッシュボードなど、素早い可視化が求められる場面で大活躍します。

メリット：高速で簡単！数式や手動での系列操作は一切不要。日常業務にぴったりで、その他の便利なグラフ機能も活用できます。

自動化またはプログラム可能なソリューションを好む場合、あるいは複数のグラフやワークシートでこの処理を繰り返す必要がある場合は、シンプルな VBA マクロを使用して縦棒グラフに直接平均線を挿入できます。この方法は柔軟でカスタマイズ可能ですが、基本的なコーディングとマクロ実行が必要です。

1．グラフ内の任意のデータ系列をクリックすると、その系列に含まれるすべての列が選択され、選択ハンドルが表示されます。

2．ALT + F11キーを押して、Excel のMicrosoft Visual Basic for Applicationsウィンドウを開きます。

3．VBA エディターで、挿入＞標準モジュールをクリックして、新しいモジュールウィンドウを開きます。以下の VBA コードをコピーし、ウィンドウに貼り付けてください。

VBA：グラフに平均線を追加する

Sub AverageLine()
'Update 20130907
Dim ser As Series
Dim arr As Variant
Dim total As Double
Dim outArr As Variant
If VBA.TypeName(Application.Selection) <> "Series" Then Exit Sub
Set ser = Application.Selection
arr = ser.Values
total = Application.WorksheetFunction.Average(arr)
ReDim outArr(LBound(arr) To UBound(arr))
For i = LBound(outArr) To UBound(outArr)
    outArr(i) = total
Next
With ActiveChart.SeriesCollection.NewSeries
    .XValues = ser.XValues
    .Values = outArr
    .Name = "Average " & ser.Name
    .AxisGroup = ser.AxisGroup
    .MarkerStyle = xlNone
    .Border.Color = ser.Border.Color
    .ChartType = xlLine
    .Format.Line.ForeColor.ObjectThemeColor = msoThemeColorAccent6
End With
End Sub

4．コードを貼り付けたら、F5キーを押してマクロを実行してください。実行すると、下図のように縦棒グラフに即座に水平な平均線が追加されます。

注記：この VBA マクロは2-D 縦棒グラフ専用に設計されています。他のグラフ形式をご利用の場合は、コードを調整するか、対応しているグラフの種類に切り替えてください。

適用可能なシナリオ：チャートの修正を自動化したい上級ユーザー、または手動操作なしで複数のグラフを一括処理したい場合に最適です。

メリット：カスタマイズ可能で、一括処理もでき、繰り返しタスクにかかる時間を大幅に節約します。

制限事項：マクロを有効化し、VBA に習熟している必要があります。Excel の組み込みグラフツールやアドインほどの即時性はありません。また、グラフ構造が複雑な場合には、問題が発生する可能性があります。

トラブルシューティング：マクロが実行されない、またはエラーが発生する場合は、グラフが2-D 縦棒グラフになっているかを確認し、VBA コード内の参照に不足や誤りがないかを改めてチェックしてください。あわせて、Excel のトラストセンター設定でマクロが有効になっているかもご確認ください。

実用的なヒント：意図しない変更を防ぐため、見慣れないマクロを実行する前に必ずワークブックを保存してください。さらに安全を確保したい場合は、まずデータのコピーに対してマクロを実行することをおすすめします。