Note: The other languages of the website are Google-translated. Back to English
Inloggen  \/ 
x
or
x
Registreer  \/ 
x

or

Hoe snel zichtbare of gefilterde cellen alleen in Excel tellen?

Over het algemeen telt in Excel de normale formule = COUNT (B3: B16) het aantal onzichtbare en verborgen cellen. Maar in deze zelfstudie zal ik enkele snelle manieren introduceren om u te helpen de zichtbare of gefilterde cellen alleen in Excel te tellen.

aantal documenten zichtbaar 1

Tel zichtbare cellen alleen met door de gebruiker gedefinieerde functie

Tel zichtbare cellen alleen met Kutools voor Excel goed idee 3

pijl blauw rechts bel Tel zichtbare cellen alleen met door de gebruiker gedefinieerde functie

Gebruiken Door de gebruiker gedefinieerde functie om alleen de zichtbare cellen te tellen.

1. druk op Alt + F11 toetsen tegelijk, a Microsoft Visual Basic voor toepassingen venster springt uit.

2. klikken Invoegen > Module, en plak onder VBA-code naar de pop-out Module venster.

VBA: tel alleen zichtbare cellen.

Function COUNTVISIBLE(Rg)
'UpdatebyKutoolsforExcel20151208
    Dim xCount As Long
    Dim xCell As Range
    Application.Volatile
    For Each xCell In Rg
        If (Not xCell.EntireRow.Hidden) And (Not xCell.EntireColumn.Hidden) Then
            xCount = xCount + 1
        End If
    Next
    COUNTVISIBLE = xCount
End Function

3. Sla vervolgens de code op en sluit het Module venster, en selecteer vervolgens een cel die het resultaat geeft, en typ deze formule = COUNTVISIBLE (B3: B16)en druk op de Enter sleutel om het resultaat te krijgen. Zie screenshots:

aantal documenten zichtbaar 2
doc pijl
>aantal documenten zichtbaar 3

pijl blauw rechts bel Tel zichtbare cellen alleen met Kutools voor Excel

Als u alleen zichtbare cellen wilt tellen, kunt u ook gebruiken Kutools for Excel's TELLERBAAR functie om het snel op te lossen.

Kutools for Excel, met meer dan 300 handige functies, maakt uw werk eenvoudiger. 
Gratis download
gratis volledige functionaliteit in 30 dagen

Na gratis installeren Kutools voor Excel, doe het als volgt:

1. Selecteer een cel waarin het telresultaat wordt geplaatst en klik op Kutools > Kutools-functies > Statistisch en wiskundig > TELLERBAAR. Zie screenshot:

aantal documenten zichtbaar 4

2. Vervolgens in de Functieargumenten dialoogvenster, selecteert u de gefilterde cellen die u in het Referentienummer tekstvak, en u kunt een voorbeeld van het telresultaat zien dat in het dialoogvenster is weergegeven. Zie screenshot:

aantal documenten zichtbaar 5

3. En klik dan OK om het telresultaat in de geselecteerde cel te plaatsen.

aantal documenten zichtbaar 6

Kutools for Excel's Functies inclusief enkele nuttige formules, zoals tellen / optellen / gemiddelde alleen zichtbare cellen, tellen / optellen op celkleur. tel / som op lettertypekleur enzovoort.Nu gratis proberen!

aantal documenten zichtbaar 6

Relatieve artikelen:

De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
kte tabblad 201905

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken voor u!
officetab onderkant
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    DIogo · 2 years ago
    Hi,

    I would suggest the add in the code if the person doesn't want to select the range, and it is fixe.

    Set xCell = Range("F:F") ' range exemplo in the sheet

    And (Not xCell.Value = 0)


    The entire code will be like:


    Function COUNTVISIBLE(Rg)
    'UpdatebyKutoolsforExcel20151208
    Dim xCount As Long
    Dim xCell As Range
    Application.Volatile

    Set xCell = Range("F:F") ' range exemplo in the sheet




    For Each xCell In Rg
    If (Not xCell.EntireRow.Hidden) And (Not xCell.EntireColumn.Hidden) And (Not xCell.Value = 0) Then
    xCount = xCount + 1
    End If
    Next
    COUNTVISIBLE = xCount



    End Function