如何快速將Excel中排除隱藏列的值求和？

要對不包含隱藏行的值求和，可以使用公式= SUBTOTAL（）進行求解，但是對不考慮隱藏列的值求和又如何呢？ 本文在此介紹僅在可見列中快速求和值的技巧。

VBA的總和值（不包括隱藏列）

Kutools for Excel中的總和/平均/計數排除隱藏列

---

VBA的總和值（不包括隱藏列）

這是一個VBA代碼，可以幫助您僅對可見列進行快速求和。

1。 按 Alt + F11鍵 顯示鍵 Microsoft Visual Basic應用程序 窗口。

2。 點擊 插入 > 模塊 並將以下代碼粘貼到新代碼中 模塊 窗口。

VBA：僅匯總可見列值

Public Function SumVisible(Rg As Range) As Double
'UpdatebyExtendOffice20160302
    Dim xCell As Range
    Dim xRg As Range
    Dim xOutRg As Range
    On Error Resume Next
    Application.Volatile
    Set xRg = Application.Intersect(Rg, Rg.Worksheet.UsedRange)
    If Not (xRg Is Nothing) Then
        For Each xCell In xRg
            If (xCell.EntireRow.Hidden = False) And _
               (xCell.EntireColumn.Hidden = False) Then
                If xOutRg Is Nothing Then
                    Set xOutRg = xCell
                Else
                    Set xOutRg = Application.Union(xCell, xOutRg)
                End If
            End If
        Next
    End If
    If Not xOutRg Is Nothing Then
        SumVisible = Application.Evaluate("SUM(" & xOutRg.Address & ")")
    Else
        SumVisible = 0
    End If
End Function

3.保存代碼並關閉窗口，然後返回以選擇一個空白單元格，將其放在計算結果中，然後鍵入此公式 = SumVisible（A1：C9）， 按 Enter 鍵，得出正確的求和結果。

小提示: 在公式中，A1：C9是您要求和的單元格。

---

Kutools for Excel中的總和/平均/計數排除隱藏列

也許您不熟悉VBA代碼，但是如果您有 Excel的Kutools 安裝後，您可以快速輕鬆地解決此工作。

後 免費安裝 Kutools for Excel，請執行以下操作：

1.選擇一個空白單元格，將其放入求和結果，例如E1，然後單擊 庫工具 > Kutools函數 > 統計與數學 > 可見的。 看截圖：

2。 在裡面 功能參數 對話框中，單擊以選中要匯總到的單元格 參考文獻 文本框，然後您可以在底部預覽計算的結果。 看截圖：

3。 點擊 OK，並且只匯總了可見列。

這款獨特的敏感免洗唇膜採用 Moisture WrapTM 技術和 Berry Mix ComplexTM 成分， Excel的Kutools，您還可以計算或計算可見單元格/行/列中的平均值。 看截圖：

小提示: 您也可以直接輸入此公式 = SUMVISIBLE（A1：C9）/ = COUNTVISIBLE（A1：C9）/ = AVERAGEVISIBLE（A1：C9） 安裝後進入單元以獲取結果 Excel的Kutools.

---