Прескочи на основното съдържание

Как бързо да преброите видими или филтрирани клетки само в Excel?

Автор: Слънце Последна промяна: 2020-07-09

Обикновено в Excel нормалната формула =БРОЙ(B3:B16) ще преброи броя на всички невидими и скрити клетки. Но в този урок ще представя някои бързи начини, които да ви помогнат да преброите видимите или филтрирани клетки само в Excel.

видим брой документи 1

Преброяване на видимите клетки само с дефинирана от потребителя функция

Пребройте видимите клетки само с Kutools за Excel добра идея3


стрелка син десен балон Преброяване на видимите клетки само с дефинирана от потребителя функция

Употреба Потребителска функция за да преброите само видимите клетки.

1. Натиснете Alt + F11 клавиши едновременно, a Microsoft Visual Basic за приложения изскача прозорец.

2. кликване Поставете > Модулии поставете под кода на VBA в изскачащия прозорец Модули прозорец.

VBA: Преброяване само на видими клетки.

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. След това запазете кода и затворете Модули прозорец и след това изберете клетка, която извежда резултат, и въведете тази формула =БРОЙ ВИДИМ(B3:B16), и натиснете Въведете ключ за получаване на резултата. Вижте екранни снимки:

видим брой документи 2
doc стрелка
>видим брой документи 3

стрелка син десен балон Пребройте видимите клетки само с Kutools за Excel

За да преброите само видимите клетки, можете също да използвате Kutools за ExcelЕ БРОЙ ВИДИМ функция за бързо разрешаване.

Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. 

След безплатно инсталиране Kutools за Excel, моля, направете следното:

1. Изберете клетка, в която ще се постави резултатът от преброяването, и щракнете Kutools > Функции на Kutools > Статистика и математика > БРОЙ ВИДИМ. Вижте екранна снимка:

видим брой документи 4

2. След това в Функционални аргументи изберете филтрираните клетки, които искате да преброите в препратка текстово поле и можете да прегледате резултата от преброяването, показан в диалоговия прозорец. Вижте екранна снимка:

видим брой документи 5

3. И след това щракнете OK за да поставите резултата от преброяването в избраната клетка.

видим брой документи 6

Kutools за Excel's Функции включително някои полезни формули, като брой/сума/средни само видими клетки, брой/сума по цвят на клетката. брой/сума по цвят на шрифта и т.н.За да получите безплатен пробен период сега!

видим брой документи 6


Относителни статии:


Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
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