Gizli sütunları hariç tutarak değerleri hızlıca toplamak için Excel'de nasıl yapılır?

Gizli satırları hariç tutarak değerleri toplamak için =SUBTOTAL() formülünü kullanabilirsiniz, ancak gizli sütunları görmezden gelerek değerleri toplamak istersek ne yapmalıyız? Bu makalede, yalnızca görünür sütunlardaki değerleri hızlı bir şekilde toplama yöntemlerini ele alıyoruz.

VBA ile gizli sütunları hariç tutarak değerleri toplama

Kutools for Excel ile gizli sütunları hariç tutarak toplama/ortalama/sayma

VBA ile gizli sütunları hariç tutarak değerleri toplama

İşte size yalnızca görünür sütunları hızlıca toplamanıza yardımcı olabilecek bir VBA kodu.

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ekle > Modül'e tıklayın ve aşağıdaki kodu yeni Modül penceresine yapıştırın.

VBA: Yalnızca görünür sütun değerlerini toplama

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. Kodu kaydedin ve pencereyi kapatın, ardından hesaplama sonucunu yerleştireceğiniz boş bir hücre seçin ve bu formülü yazın =SumVisible(A1:C9), Enter tuşuna basın ve doğru toplam sonucu görünecektir.

İpucu: Formülde, A1:C9 toplamak istediğiniz hücrelerdir.

Kutools for Excel ile gizli sütunları hariç tutarak toplama/ortalama/sayma

Belki VBA kodu konusunda deneyimli değilsinizdir, ancak Kutools for Excel yüklüyse bu işi hızlı ve kolay bir şekilde çözebilirsiniz.

1. Toplama sonucunu yerleştireceğiniz boş bir hücreyi seçin, örneğin E1 ve tıklayın Kutools > Kutools Fonksiyonlar > İstatistiksel & Matematik > SUMVISIBLE. Ekran görüntüsüne bakın:

2. Fonksiyon Argümanları diyalog kutusunda, toplamak istediğiniz hücreleri seçmek için Referans metin kutusuna tıklayın ve en altta hesaplanan sonucu önizleyebilirsiniz. Ekran görüntüsüne bakın:

3. Tıklayın Tamam, ve yalnızca görünür sütunlar toplanmış olacaktır.

ile Kutools for Excel, ayrıca görünür hücrelerde/satırlarda/sütunlarda sayma veya ortalama hesaplamaları da yapabilirsiniz. Ekran görüntüsüne bakın:

İpucu: Kutools for Excel'i yükledikten sonra, bu formülü =SUMVISIBLE(A1:C9)/ =COUNTVISIBLE(A1:C9)/ =AVERAGEVISIBLE(A1:C9) doğrudan hücreye yazarak sonucu elde edebilirsiniz.