Ga naar hoofdinhoud

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

Gebruik een 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. 

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 Referentie 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:


Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


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 honderden muisklikken voor u elke dag!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
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
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations