如何在 Excel 中剔除最低分後，計算剩餘數值的平均值或總和？

作者Xiaoyang修改日期2025-08-12

當您在 Excel 中處理學生成績或分數清單時，可能需要先排除最低分，甚至最低的 n 個分數，再對剩餘數值計算平均或加總。這種做法在教育場景中相當常見，例如允許學生捨棄表現最差的項目，以應對異常狀況或提升評分公平性。然而，若手動執行此操作，面對大型資料集或需頻繁調整計算時，往往費時又繁瑣。所幸，Excel 提供了多種靈活方案來簡化這項任務——無論是透過簡潔的公式，還是運用 VBA 自動化批次處理，都能輕鬆達成目標。

使用公式捨棄最低分數並取得平均值或總和

VBA 程式碼－自動捨棄最低或最低 n 個分數並計算總和或平均值

使用公式捨棄最低分數並取得平均值或總和

如果您希望從資料列或清單中排除最小值，或最小的 n 個數值，再對剩餘數值進行計算（例如求平均或加總），Excel 內建的公式提供了一種實用的解決方案。當您處理適量資料，或偏好使用公式以確保透明度與便於調整時，這些公式解法尤其適合。

以下分別說明「加總」與「平均」兩種方法，包含詳細的操作步驟與實用技巧，助您靈活運用。

加總數值但捨棄最低或最低 N 個數值：

若要在每列或清單中計算總和並排除最低數值，請使用下列方法：

1. 選取一個空白儲存格作為第一列的加總結果位置（例如，若您的資料位於 B2:H2，請選取 I2），然後輸入下列公式：

=SUM(B2:H2)-SMALL(B2:H2,1)

2. 按下 Enter 確認，再向下拖曳填滿控點，即可將此公式套用至其他列，自動加總每列所有數值並排除最低值。

參考截圖如下：

使用公式加總數字但排除最小值

注意事項與提示：

若要排除最低的兩個、三個或更多數值，您可擴充公式，再減去額外的 SMALL 函數結果。例如：

=SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2)

=SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2)-SMALL(B2:H2,3)

=SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2)-SMALL(B2:H2,3)-...-SMALL(B2:H2,n)

在這些公式中，B2:H2 是您要加總的範圍，而數字 1、2、3 等則用來指定要排除的第 n 小數值。請根據您想捨棄多少個最低分數，靈活調整 n！
請注意，切勿將 n 設為大於或等於總數值數量，否則將導致錯誤或非預期的結果。
這些公式會針對每一列獨立運作。若您的資料是以欄（而非列）呈現，請相應調整範圍。
如果您的資料集中包含多個相同的最低數值，SMALL(B2:H2,1) 每次引用僅會排除其中一個項目。若要排除多個重複項目，請如上所示，以遞增的 k 值多次使用 SMALL 函數。

計算平均值但捨棄最低或最低 N 個數值：

若要計算平均值時忽略最低或最低的 n 個數值，可使用下列公式。此計算方式在評分制度中尤其實用，例如排除異常偏低的表現，不將其納入平均計算。

1. 選取一個儲存格作為平均值的計算結果位置（例如，若您的分數位於 B2:H2，請選取 J2），並輸入下列公式：

=(SUM(B2:H2)-SMALL(B2:H2,1))/(COUNT(B2:H2)-1)

2. 按下 Enter 後，視需要向下拖曳公式，即可對其他列進行平均計算，每次皆排除該列範圍中的最低分數。

使用公式計算平均值但排除最小值

注意事項與重要指引：

若要在捨棄多於一個最低分數的同時計算平均值，請擴充公式，減去額外的 SMALL 項，並相應減少除數：

=(SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2))/(COUNT(B2:H2)-2)

=(SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2)-SMALL(B2:H2,3))/(COUNT(B2:H2)-3)

=(SUM(B2:H2)-SMALL(B2:H2,1)-SMALL(B2:H2,2)-SMALL(B2:H2,3)-...-SMALL(B2:H2,n))/(COUNT(B2:H2)-n)

同樣地，B2:H2 為要計算平均值的範圍，而 n 代表有多少個最低數值將不納入計算。
若試圖減去的數值數量超過範圍內的實際總數，公式將傳回 #NUM!錯誤，表示用於計算平均的數值不足。請務必確保 n 小於數值的總個數。
建議在排除最低數值前，再次確認這些數值對您的計算是否非關鍵或非必要，因為排除後可能影響最終結果。
針對極大型資料集，或需動態排除最低 n 個數值的情境，建議採用自動化或陣列解決方案。

透過 KUTOOLS AI 解鎖 Excel 的神奇功能

智慧執行：透過簡易指令，輕鬆執行儲存格操作、分析資料，並建立圖表！
自訂公式：打造專屬公式，讓您的工作流程更順暢！
VBA 編碼：輕鬆撰寫並套用 VBA 程式碼，立即提升工作效率！
公式解析：輕鬆掌握複雜公式！
文字翻譯：輕鬆打破試算表中的語言隔閡！

運用 AI 驅動的工具強化您的 Excel 能力。立即下載體驗前所未有的高效！

VBA 程式碼－自動捨棄最低或最低 n 個分數並計算總和或平均值

在處理大型或經常變動的資料集，或需要自動化捨棄最低 n 個分數並對多列計算總和或平均值時，使用 VBA 能大幅簡化重複性工作。透過 VBA 巨集，您只需指定資料範圍與要排除的最低分數數量，程式碼便能高效地一次性處理所有選取的列。

此自動化解決方案特別適合需要管理多班級資料表的老師，或任何希望減少手動輸入公式與潛在錯誤的人士。下方提供的方案讓您輕鬆調整排除數量與目標函數（總和或平均）。

開始前，請先儲存您的活頁簿，因為執行巨集後無法直接復原。

1. 按一下開發人員＞Visual Basic。在 Microsoft Visual Basic for Applications 視窗中，按一下插入＞模組，然後輸入下列程式碼：

Sub DropLowestNandCalculate()
    Dim WorkRng As Range
    Dim OutputRng As Range
    Dim n As Integer
    Dim FuncType As String
    Dim i As Integer, j As Integer, k As Integer
    Dim Arr() As Variant, TempArr() As Double
    Dim RowSum As Double
    Dim RowCount As Integer
    Dim MinIdx() As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select the score range (rows to process):", xTitleId, WorkRng.Address, Type:=8)
    
    Set OutputRng = Application.InputBox("Select output cells (top-left for results):", xTitleId, WorkRng.Offset(0, WorkRng.Columns.Count).Cells(1, 1).Address, Type:=8)
    
    n = Application.InputBox("Number of lowest grades to drop (n):", xTitleId, "1", Type:=1)
    
    FuncType = Application.InputBox("Type 'SUM' to calculate total or 'AVG' to calculate average (not case sensitive):", xTitleId, "AVG", Type:=2)
    
    For i = 1 To WorkRng.Rows.Count
        Arr = Application.WorksheetFunction.Transpose(Application.WorksheetFunction.Transpose(WorkRng.Rows(i).Value))
        RowCount = UBound(Arr)
        
        ReDim TempArr(1 To RowCount)
        For j = 1 To RowCount
            TempArr(j) = Arr(j)
        Next j
        
        ' Mark n lowest values as used by setting to very high number
        For k = 1 To n
            Dim MinVal As Double, MinPos As Integer
            MinVal = Application.WorksheetFunction.Min(TempArr)
            
            For j = 1 To RowCount
                If TempArr(j) = MinVal Then
                    TempArr(j) = 1E+308
                    Exit For
                End If
            Next j
        Next k
        
        RowSum = 0
        Dim ValidCount As Integer
        ValidCount = 0
        
        For j = 1 To RowCount
            If TempArr(j) <> 1E+308 Then
                RowSum = RowSum + Arr(j)
                ValidCount = ValidCount + 1
            End If
        Next j
        
        If UCase(FuncType) = "AVG" Then
            If ValidCount = 0 Then
                OutputRng.Cells(i, 1).Value = "N/A"
            Else
                OutputRng.Cells(i, 1).Value = RowSum / ValidCount
            End If
        Else
            OutputRng.Cells(i, 1).Value = RowSum
        End If
    Next i
End Sub

2. 加入程式碼後，請點擊按鈕，或按下 F5 立即執行！

3. 請依照畫面提示進行操作：

選取您要處理的分數範圍（請確保每位學生的分數皆位於同一列）。
選擇列表放置區域左上角的儲存格名稱（輸出結果將依列數向下填滿）。
請輸入要捨棄的最低分數數量（例如，）1 表示每列僅排除最低的一個分數）。
輸入 SUM 即可取得總分（不含已捨棄的分數），或輸入 AVG 立即獲得重新計算後的平均分（不含已捨棄的分數）！

巨集會逐一處理指定分數區域中的每一列，並將所選的總和或平均值填入您指定的列表放置區域。若某列的所有分數皆被捨棄，結果將標示為 N/A，以避免錯誤發生。

請確保輸入區域符合您的資料結構（每列包含一位學生的全部分數）。
非數值儲存格（例如空白或文字）將自動忽略。
這段 VBA 程式碼能大幅提升全班重複性評分計算的效率，並支援彈性調整需捨棄的分數數量。
若您經常執行此類操作，不妨將此巨集指派給工作表上的按鈕，以實現更快速的存取。

如果您遇到輸出結果錯誤或其他問題，請再次確認範圍是否正確指定，且「n」未大於或等於每列可用分數的總數。

對於類似的自動化需求（例如同時剔除最高與最低分數，或處理欄位而非列），僅需對 VBA 程式碼的邏輯稍作調整即可。

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多