如何在 Excel 圖表中新增一條水平平均線？

若想在圖表上以水平線直觀呈現資料的平均值，可先運用 Excel 內建函數計算平均數，再將結果整合至現有圖表中。此方法適用於長條圖、直條圖或折線圖，讓平均值清晰地以覆蓋層形式呈現。

1. 首先計算資料集的平均值。在輔助欄位（例如 C 欄）的 C2 儲存格中輸入下列公式：=AVERAGE($B$2:$B$8)。此公式會計算 B2 至 B8 範圍內所有數值的平均值。接著，使用自動填滿控制點向下拖曳此公式，使其範圍與您的資料相符。如此可確保每一列都顯示相同的固定平均值，進而在圖表中形成一條水平線。

提示：請仔細檢查公式中的範圍，確保涵蓋所有相關數據！若您的資料集更大或位於其他欄位，務必相應調整儲存格參照，以免算出錯誤的平均值。

2. 選取原始資料與輔助欄位後，前往插入索引標籤，選擇最適合您分析的儀表類型（例如二維柱狀圖），並同時繪製資料與平均數系列，即可為自訂圖表奠定堅實基礎。

3. 插入圖表後，找到新繪製的平均數系列，通常會以獨立的長條（常為紅色）出現在原始資料旁。按一下其中一個長條即可選取整個平均數系列，接著按右鍵，並從內容功能表中選擇變更系列儀表類型。

4. 變更儀表類型對話方塊將會出現。在左側面板中選取組合圖儀表類型，並針對平均系列，從下拉式選單中選擇折線圖樣式。這會將平均數系列從長條轉換為水平直線，讓平均值在圖表中更加醒目！

提示：請務必留意，避免意外將您的資料系列儀表類型更改為折線圖，否則將改變圖表的顯示方式——除非這正是您想要的效果！

5. 按一下確定，您的圖表便會在資料欄位上方顯示一條水平平均線，作為快速比較的參考點！

適用情境：此方法非常適合需要完全動態解決方案的場合——當您在更新資料集後，平均值與圖表將自動同步更新。雖然需手動設定一次，但無需安裝任何增益集或撰寫程式碼。

優點：運用 Excel 內建工具，資料變更時自動更新，且高度可自訂。

限制：處理大型資料集或多個系列時稍顯耗時；面對更複雜的資料結構，您需手動調整公式與圖表選取範圍。

疑難排解：若平均線未如預期顯示，請檢查公式範圍，確認在插入圖表前已同時選取資料與平均值欄位，並確保變更圖表類型時處於組合圖對話方塊中。

另一種替代方法特別適用於經常新增平均線或其他參考標記的情況，即是使用在圖表中插入直線功能（位於 ）Kutools for Excel 中）。此工具能大幅簡化流程、減少操作步驟，並免去手動設定公式的麻煩。只要您已建立圖表，Kutools 僅需幾次點擊與少量設定，即可輕鬆加入平均線！

假設您已建立如截圖所示的標準柱狀圖，並希望快速呈現資料點的平均值。

1. 按一下選取柱狀圖，然後導航至 Kutools＞ 圖表＞ 在圖表中插入直線，即可開啟該功能的對話方塊。

2. 在對話方塊中，只需勾選平均選項，然後按一下確定。

您的柱狀圖現在會立即顯示一條水平平均線，讓您更輕鬆呈現分析結果並進行視覺化比較。

適用情境：此解決方案非常適合需要處理大量圖表，或希望節省時間、免去繁瑣設定的使用者，尤其適用於簡報或儀表板等需快速完成視覺化的場合！

優點：操作快速簡單，無需輸入公式或手動調整數據系列，特別適合例行性工作，並內建多項實用的圖表功能！

對於偏好自動化或可程式化解決方案，或需要在多個圖表與工作表中重複執行此操作的使用者，可透過簡單的 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 巨集僅適用於二維柱狀圖類型。若您使用其他圖表格式，可能需要調整程式碼，或切換至支援的圖表類型。

適用情境：最適合需要自動化修改圖表的進階使用者，或需在多個圖表中批量處理、無須手動介入的情境。

優點：可自訂、支援批次處理，並能保存重複性任務的執行時間。

限制：需啟用巨集並具備 VBA 基礎，操作上不如內建圖表工具或增益集即時便捷；若圖表結構較複雜，可能遭遇相容性問題。

疑難排解：若巨集無法執行或出現錯誤，請確認您的圖表為二維柱狀圖、仔細檢查 VBA 程式碼是否有遺漏或錯誤的參照，並驗證 Excel 信任中心設定中是否已啟用巨集。

實用提示：執行不熟悉的巨集前，請先儲存活頁簿，避免意外變更。為確保安全，建議先在資料副本上執行巨集！