Hoe kan ik snel waarden optellen terwijl verborgen kolommen in Excel worden uitgesloten?

Om waarden op te tellen waarbij verborgen rijen worden uitgesloten, kun je de formule =SUBTOTAL() gebruiken om dit op te lossen, maar hoe zit het met het optellen van waarden waarbij verborgen kolommen worden genegeerd? Dit artikel introduceert trucs om snel waarden in alleen de zichtbare kolommen op te tellen.

Waarden optellen met uitzondering van verborgen kolommen met VBA

Som/gemiddelde/telling uitsluitend voor zichtbare kolommen met Kutools voor Excel

Waarden optellen met uitzondering van verborgen kolommen met VBA

Hier is een VBA-code die je kan helpen om snel alleen zichtbare kolommen op te tellen.

1. Druk op Alt + F11 toetsen om het Microsoft Visual for Basic Applications-venster weer te geven.

2. Klik op Invoegen > Module en plak onderstaande code in het nieuwe Module-venster.

VBA: Alleen zichtbare kolomwaarden optellen

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. Sla de code op en sluit het venster, ga vervolgens terug naar een lege cel waar je het berekende resultaat wilt plaatsen, en typ deze formule =SomZichtbaar(A1:C9), druk op Enter-toets, en het juiste somresultaat verschijnt.

Tip: In de formule is A1:C9 de cellen die je wilt optellen.

Som/gemiddelde/telling uitsluitend voor zichtbare kolommen met Kutools voor Excel

Misschien ben je niet bekend met VBA-code, maar als je Kutools voor Excel hebt geïnstalleerd, kun je deze taak snel en gemakkelijk oplossen.

1. Selecteer een lege cel waarin het somresultaat komt, bijvoorbeeld E1, en klik Kutools > Kutools Functies > Statistisch & Wiskunde > SOMZICHTBAAR. Zie screenshot:

2. In het Functieargumenten dialoogvenster, klik om de cellen die je wilt optellen te selecteren in de Referentie tekstvak, en je kunt het berekende resultaat onderaan bekijken. Zie screenshot:

3. Klik OK, en alleen de zichtbare kolommen zijn opgeteld.

Met Kutools voor Excel, kun je ook tellen of het gemiddelde berekenen in zichtbare cellen/rijen/kolommen. Zie screenshot:

Tip: Je kunt ook direct deze formule typen =SOMZICHTBAAR(A1:C9)/ =TELLINGZICHTBAAR(A1:C9)/ =GEMIDDELDEZICHTBAAR(A1:C9) in de cel om het resultaat te krijgen na installatie van Kutools voor Excel.