Vba excel countifs примеры

Метод WorksheetFunction.CountIfs (Excel)

Подсчитывает количество ячеек в диапазоне, соответствующих нескольким критериям.

Синтаксис

Выражение Переменная, представляющая объект WorksheetFunction .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Arg1	Обязательный	Range	Один или несколько диапазонов, в которых вычисляется связанный критерий.
Arg2 — Arg30	Обязательный	Variant	Один или несколько критериев в виде числа, выражения, ссылки на ячейку или текста, определяющих, какие ячейки будут подсчитываться. Например, критерии можно выразить как 32, «32», «>32», «яблоки» или B4.

Возвращаемое значение

Double

Замечания

Каждая ячейка в диапазоне подсчитывается только в том случае, если для этой ячейки задано значение True .

Если ячейка в любом аргументе является пустой ячейкой, CountIfs обрабатывает ее как значение 0.

Используйте подстановочные знаки, вопросительный знак (?) и звездочку (*) в критериях. Вопросительный знак соответствует любому одному символу; звездочка соответствует любой последовательности символов. Если вы хотите найти фактический вопросительный знак или звездочку, введите тильду (

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Источник

WorksheetFunction.CountIfs method (Excel)

Counts the number of cells within a range that meet multiple criteria.

Syntax

expression A variable that represents a WorksheetFunction object.

Parameters

Name	Required/Optional	Data type	Description
Arg1	Required	Range	One or more ranges in which to evaluate the associated criteria.
Arg2 – Arg30	Required	Variant	One or more criteria in the form of a number, expression, cell reference, or text that define which cells will be counted. For example, criteria can be expressed as 32, «32», «>32», «apples», or B4.

Return value

Double

Each cell in a range is counted only if all of the corresponding criteria specified are True for that cell.

If a cell in any argument is an empty cell, CountIfs treats it as a 0 value.

Use the wildcard characters, question mark (?) and asterisk (*), in criteria. A question mark matches any single character; an asterisk matches any sequence of characters. If you want to find an actual question mark or asterisk, type a tilde (

) before the character.

See also

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.

Источник

Функции VBA СЧЁТЕСЛИ и СЧЁТЕСЛИ

Из этого туториала Вы узнаете, как использовать функции Excel СЧЁТЕСЛИ и СЧЁТЕСЛИ в VBA.

VBA не имеет эквивалента функций СЧЁТЕСЛИ или СЧЁТЕСЛИМН, которые вы можете использовать — пользователь должен использовать встроенные функции Excel в VBA, используя Рабочий лист объект.

СЧЕТЕСЛИ Рабочий лист

Объект WorksheetFunction можно использовать для вызова большинства функций Excel, доступных в диалоговом окне «Вставить функцию» в Excel. Функция СЧЁТЕСЛИ — одна из них.

123	Sub TestCountIf ()Range («D10») = Application.WorksheetFunction.CountIf (Range («D2: D9»), «> 5»)Конец подписки

Приведенная выше процедура будет подсчитывать только ячейки в диапазоне (D2: D9), если они имеют значение 5 или больше. Обратите внимание: поскольку вы используете знак «больше», критерии больше 5 должны быть заключены в круглые скобки.

Присвоение переменной результата COUNTIF

Возможно, вы захотите использовать результат своей формулы в другом месте кода, а не записывать его непосредственно обратно в Excel Range. В этом случае вы можете присвоить результат переменной, которая будет использоваться позже в вашем коде.

1234567

Sub AssignSumIfVariable ()Тусклый результат как двойной’Назначьте переменнуюresult = Application.WorksheetFunction.CountIf (Range («D2: D9»), «> 5»)’Показать результатMsgBox «Количество ячеек со значением больше 5 равно» & результатКонец подписки

Использование СЧЁТЕСЛИМН

Функция СЧЁТЕСЛИМН похожа на функцию СЧЁТЕСЛИ Worksheet, но позволяет вам проверять более одного критерия. В приведенном ниже примере формула подсчитывает количество ячеек от D2 до D9, где цена продажи больше 6, а себестоимость больше 5.

123	Sub UsingCountIfs ()Range («D10») = WorksheetFunction.CountIfs (Range («C2: C9»), «> 6», Range («E2: E9»), «> 5»)Конец подписки

Использование COUNTIF с объектом диапазона

Вы можете назначить группу ячеек объекту Range, а затем использовать этот объект Range с Рабочий лист объект.

123456789

Sub TestCountIFRange ()Dim rngCount as Range’назначить диапазон ячеекУстановите rngCount = Range («D2: D9»)’используйте диапазон в формулеДиапазон («D10») = WorksheetFunction.SUMIF (rngCount, «> 5»)’освободить объекты диапазонаУстановите rngCount = NothingКонец подписки

Использование COUNTIFS для объектов с несколькими диапазонами

Точно так же вы можете использовать COUNTIFS для нескольких объектов диапазона.

123456789101112

Sub TestCountMultipleRanges ()Dim rngCriteria1 As ДиапазонDim rngCriteria2 as Range’назначить диапазон ячеекУстановить rngCriteria1 = Range («D2: D9»)Установить rngCriteria2 = Range («E2: E10»)’используйте диапазоны в формулеДиапазон («D10») = WorksheetFunction.CountIfs (rngCriteria1, «> 6», rngCriteria2, «> 5»)’освободить объекты диапазонаУстановить rngCriteria1 = NothingУстановить rngCriteria2 = NothingКонец подписки

СЧЁТЕСЛИ Формула

Когда вы используете WorksheetFunction.COUNTIF чтобы добавить сумму к диапазону на листе, возвращается статическое значение, а не гибкая формула. Это означает, что при изменении ваших цифр в Excel значение, возвращаемое Рабочий лист не изменится.

В приведенном выше примере процедура подсчитала количество ячеек со значениями в диапазоне (D2: D9), где цена продажи больше 6, и результат был помещен в D10. Как вы можете видеть в строке формул, это число, а не формула.

Если любое из значений изменится в диапазоне (D2: D9), результат в D10 будет НЕТ изменение.

Вместо использования Рабочий лист Функция. Сумма Если, вы можете использовать VBA для применения функции СУММЕСЛИ к ячейке с помощью Формула или Формула R1C1 методы.

Формула Метод

Метод формулы позволяет указать конкретный диапазон ячеек, например: D2: D9, как показано ниже.

123	Sub TestCountIf ()Диапазон («D10»). FormulaR1C1 = «= СЧЁТЕСЛИ (D2: D9,» «> 5» «)»Конец подписки

Метод FormulaR1C1

Метод FormulaR1C1 более гибкий, поскольку он не ограничивает вас заданным диапазоном ячеек. Пример ниже даст нам тот же ответ, что и приведенный выше.

123	Sub TestCountIf ()Диапазон («D10»). FormulaR1C1 = «= СЧЁТЕСЛИ (R [-8] C: R [-1] C,» «> 5» «)»Конец подписки

Однако, чтобы сделать формулу еще более гибкой, мы могли бы изменить код, чтобы он выглядел так:

123	Sub TestCountIf ()ActiveCell.FormulaR1C1 = «= СЧЁТЕСЛИ (R [-8] C: R [-1] C,» «> 5» «)»Конец подписки

Где бы вы ни находились на своем листе, формула затем подсчитает ячейки, которые соответствуют критериям непосредственно над ней, и поместит ответ в вашу ActiveCell. На диапазон внутри функции СЧЁТЕСЛИ необходимо ссылаться с использованием синтаксиса строки (R) и столбца (C).

Оба эти метода позволяют использовать динамические формулы Excel в VBA.

Теперь вместо значения в D10 будет формула.

Источник

VBA COUNTIF and COUNTIFS Functions

In this Article

This tutorial will show you how to use the Excel COUNTIF and COUNTIFS functions in VBA

VBA does not have an equivalent of Excel’s COUNTIF or COUNTIFS Functions. Instead, you must call the Excel functions by using the WorkSheetFunction object.

COUNTIF WorksheetFunction

The WorksheetFunction object can be used to call most of the Excel functions that are available within the Insert Function dialog box in Excel. The COUNTIF Function is one of them.

The procedure above will only count the cells in Range(D2:D9) if they have a value of 5 or greater. Notice that because you are using a greater than sign, the criteria greater than 5 needs to be within parenthesis.

Assigning a COUNTIF result to a Variable

You may want to use the result of your formula elsewhere in code rather than writing it directly back to an Excel Range. If this is the case, you can assign the result to a variable to use later in your code.

Using COUNTIFS

The COUNTIFS function is similar to the COUNTIF WorksheetFunction but it enables you to check for more than one criteria. In the example below, the formula will count up the number of cells in D2 to D9 where the Sale Price is greater than 6 AND the Cost Price is greater than 5.

Using COUNTIF with a Range Object

You can assign a group of cells to the Range object, and then use that Range object with the WorksheetFunction object.

Using COUNTIFS on Multiple Range Objects

Similarly, you can use COUNTIFS on multiple Range Objects.

COUNTIF Formula

When you use the WorksheetFunction.COUNTIF to add a sum to a range in your worksheet, a static value is returned, not a flexible formula. This means that when your figures in Excel change, the value that has been returned by the WorksheetFunction will not change.

In the example above, the procedure has counted the amount of cells with values in Range(D2:D9) where the Sale Price is greater than 6, and the result was put in D10. As you can see in the formula bar, this result is a figure and not a formula.

If any of the values change in Range(D2:D9), the result in D10 will NOT change.

Instead of using the WorksheetFunction.SumIf, you can use VBA to apply a COUNTIF Function to a cell using the Formula or FormulaR1C1 methods.

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro — A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!

Formula Method

The formula method allows you to point specifically to a range of cells eg: D2:D9 as shown below.

FormulaR1C1 Method

The FormulaR1C1 method is more flexible in that it does not restrict you to a set range of cells. The example below will give us the same answer as the one above.

However, to make the formula even more flexible, we could amend the code to look like this:

Wherever you are in your worksheet, the formula will then count the cells that meet the criteria directly above it and place the answer into your ActiveCell. The Range inside the COUNTIF function has to be referred to using the Row (R) and Column (C) syntax.

Both these methods enable you to use Dynamic Excel formulas within VBA.

There will now be a formula in D10 instead of a value.

VBA Code Examples Add-in

Easily access all of the code examples found on our site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

Источник