Проверка переменных и выражений с помощью встроенных функций VBA Excel: IsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull, IsNumeric, IsObject.
Проверка переменных и выражений
Встроенные функции VBA Excel — IsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull, IsNumeric, IsObject — проверяют значения переменных и выражений на соответствие определенному типу данных или специальному значению.
Синтаксис функций для проверки переменных и выражений:
Expression — выражение, переменная или необязательный аргумент для IsMissing.
Все функции VBA Excel для проверки переменных и выражений являются логическими и возвращают значение типа Boolean — True или False.
Функция IsArray
Описание функции
Функция IsArray возвращает значение типа Boolean, указывающее, является ли переменная массивом:
- True — переменная является массивом;
- False — переменная не является массивом.
Пример с IsArray
Sub Primer1() Dim arr1(), arr2(1 To 10), arr3 Debug.Print IsArray(arr1) ‘Результат: True Debug.Print IsArray(arr2) ‘Результат: True Debug.Print IsArray(arr3) ‘Результат: False arr3 = Array(1, 2, 3, 4, 5) Debug.Print IsArray(arr3) ‘Результат: True End Sub |
Как показывает пример, функция IsArray возвращает True и в том случае, если переменная только объявлена как массив, но еще не содержит значений.
Функция IsDate
Описание функции
Функция IsDate возвращает логическое значение, указывающее, содержит ли переменная значение, которое можно интерпретировать как дату:
- True — переменная содержит дату, выражение возвращает дату, переменная объявлена с типом As Date;
- False — в иных случаях.
Пример с IsDate
Sub Primer2() Dim d1 As String, d2 As Date Debug.Print IsDate(d1) ‘Результат: False Debug.Print IsDate(d2) ‘Результат: True d1 = «14.01.2023» Debug.Print IsDate(d1) ‘Результат: True Debug.Print IsDate(Now) ‘Результат: True End Sub |
Функция IsEmpty
Описание функции
Функция IsEmpty возвращает значение типа Boolean, указывающее, содержит ли переменная общего типа (As Variant) значение Empty:
- True — переменная содержит значение Empty;
- False — переменной присвоено значение, отличное от Empty.
Пример с IsEmpty
Sub Primer3() Dim s As String, v As Variant Debug.Print IsEmpty(s) ‘Результат: False Debug.Print IsEmpty(v) ‘Результат: True v = 125 Debug.Print IsEmpty(v) ‘Результат: False Range(«A1»).Clear Debug.Print IsEmpty(Range(«A1»)) ‘Результат: True Range(«A1») = 123 Debug.Print IsEmpty(Range(«A1»)) ‘Результат: False End Sub |
Как видно из примера, функцию IsEmpty можно использовать для проверки ячеек на содержание значения Empty (пустая ячейка общего формата).
Функция IsError
Описание функции
Функция IsError возвращает логическое значение, указывающее, является ли аргумент функции значением ошибки, определенной пользователем:
- True — аргумент функции является значением ошибки, определенной пользователем;
- False — в иных случаях.
Пользователь может определить одну или несколько ошибок для своей процедуры или функции с рекомендациями действий по ее (их) исправлению. Возвращается номер ошибки с помощью функции CVErr.
Пример с IsError
Допустим, пользователь определил, что ошибка №25 означает несоответствие аргумента функции Vkuba числовому формату:
Function Vkuba(x) If IsNumeric(x) Then Vkuba = x ^ 3 Else Vkuba = CVErr(25) End If End Function Sub Primer4() Debug.Print Vkuba(5) ‘Результат: 125 Debug.Print IsError(Vkuba(5)) ‘Результат: False Debug.Print Vkuba(«пять») ‘Результат: Error 25 Debug.Print IsError(Vkuba(«пять»)) ‘Результат: True End Sub |
Функция IsMissing
Описание функции
Функция IsMissing возвращает значение типа Boolean, указывающее, был ли необязательный аргумент типа данных Variant передан процедуре:
- True — если в процедуру не было передано значение для необязательного аргумента;
- False — значение для необязательного аргумента было передано в процедуру.
Пример с IsMissing
Function Scepka(x, Optional y) If Not IsMissing(y) Then Scepka = x & y Else Scepka = x & » (а необязательный аргумент не подставлен)» End If End Function Sub Primer5() Debug.Print Scepka(«Тропинка», » в лесу») ‘Результат: Тропинка в лесу Debug.Print Scepka(«Тропинка») ‘Результат: Тропинка (а необязательный аргумент не подставлен) End Sub |
Функция IsNull
Описание функции
Функция IsNull возвращает логическое значение, указывающее, является ли Null значением переменной или выражения:
- True — значением переменной или выражения является Null;
- False — в иных случаях.
Пример с IsNull
Функция IsNull особенно необходима из-за того, что любое условие с выражением, в которое входит ключевое слово Null, возвращает значение False:
Sub Primer6() Dim Var Var = Null If Var = Null Then Debug.Print Var ‘Результат: «» If Var <> Null Then Debug.Print Var ‘Результат: «» If IsNull(Var) Then Debug.Print Var ‘Результат: Null End Sub |
Функция IsNumeric
Описание функции
Функция IsNumeric возвращает значение типа Boolean, указывающее, можно ли значение выражения или переменной рассматривать как число:
- True — если аргумент функции может рассматриваться как число;
- False — в иных случаях.
Пример с IsNumeric
Sub Primer7() Debug.Print IsNumeric(«3,14») ‘Результат: True Debug.Print IsNumeric(«четыре») ‘Результат: False End Sub |
Функция IsObject
Описание функции
Функция IsObject возвращает логическое значение, указывающее, является ли переменная объектной:
- True — переменная содержит ссылку на объект или значение Nothing;
- False — в иных случаях.
Функция IsObject актуальна для переменных типа Variant, которые могут содержать как ссылки на объекты, так и значения других типов данных.
Пример с IsObject
Sub Primer8() Dim myObj As Object, myVar As Variant Debug.Print IsObject(myObj) ‘Результат: True Debug.Print IsObject(myVar) ‘Результат: False Set myVar = ActiveSheet Debug.Print IsObject(myVar) ‘Результат: True End Sub |
В языке VBA есть универсальные типы данных, т.е. способные хранить как число, так и строку, дату и любой другой тип информации. Например, ячейка в таблице может содержать что угодно и изначально, программа не знает какой в ней тип данных хранится. Кроме того, в самой программе может использоваться тип данных Variant, который так же может содержать любое значение любого типа.
Чтобы определить какой тип данных в ячейке или в переменной типа Variant, можно воспользоваться несколькими способами.
Способ 1. Использовать функцию TypeName для определения типа данных
Эта функция возвращает строку с названием типа данных на английском. В качестве аргумента принимает переменную, значение ячейки.
Обратите внимание: Функция определяет только стандартные типы данных и не может определить пользовательский тип (определенный с помощью Type).
Возможные возвращаемые функцией значения:
Byte | Число типа Byte |
Integer | Целое число |
Long | Длинное целое число |
Single | Число одиночной точности с плавающей запятой |
Double | Число двойной точности с плавающей запятой |
Currency | Валюта |
Decimal | Число с плавающей запятой |
Date | Дата |
String | Строка |
Boolean | Логическое |
Error | Ошибка |
Empty | Не проинициализировано (т.е. переменная не была объявлена) |
Null | Неверные данные (в переменной нет корректных данных) |
Object | Объект (класс) |
Unknown | Тип данных не известен |
Nothing | Объект, никуда не ссылающийся |
Приведу несколько примеров по использованию TypeName.
Пример 1. Определение типа переменной.
Dim v As Integer MsgBox TypeName(v) ' Выведет: Integer
Обратите внимание: если вы используете результат TypeName в условии, т.е. проверяете, соответствует ли тип данных определенному, например, Integer, то регистр символов возвращаемого типа имеет значение. Т.е. нужно писать Integer с заглавной буквы, либо использовать приведение всех символов к одному регистру.
Пример 2. Использование TypeName в условии.
Dim v As Integer If TypeName(v) = "Integer" Then MsgBox "Yes" Else MsgBox "No" ' Yes If TypeName(v) = "integer" Then MsgBox "Yes" Else MsgBox "No" ' No If LCase(TypeName(v)) = "integer" Then MsgBox "Yes" Else MsgBox "No" ' Yes
Пример 3. Определение типа данных в ячейке.
MsgBox TypeName(Cells(1, 1).Value) ' Выведет тип данных в ячейке A1
Если функции была передана переменная массив, она вернет тип данных в массиве с добавлением скобок.
Пример 4. Определение типа массива.
Dim Arr1(10) As Integer Dim Arr2(10) MsgBox TypeName(Arr1) ' Выведет: Integer() MsgBox TypeName(Arr2) ' Выведет: Variant()
Способ 2. Проверка на возможность преобразования строки к нужному типу.
Бывает ситуация, когда значение, например, число или дата, содержится в строке. В этом случае TypeName вернет String, а не Integer или Date. Чтобы узнать, что содержится в строке, можно воспользоваться одной из функций IsNumeric, IsDate, IsObject, IsArray, IsNull, IsError.
IsNumeric | Проверяет может ли выражение быть преобразовано в число |
IsDate | Проверяет может ли выражение быть преобразовано в дату |
IsObject | Проверяет, является ли переменная объектом |
IsArray | Проверяет, является ли переменная массивом |
IsNull | Проверка на пустое значение |
IsError | Проверка выражения на ошибку |
Пример 4. Определение может ли переменная быть преобразована в число.
Dim v As String If IsNumeric(v) Then MsgBox "yes" Else MsgBox "no" ' Выведет: no (т.к. в строке нет числа) v = "120" If IsNumeric(v) Then MsgBox "yes" Else MsgBox "no" ' Выведет: yes v = "120.45" If IsNumeric(v) Then MsgBox "yes" Else MsgBox "no" ' Выведет: no v = "test 120" If IsNumeric(v) Then MsgBox "yes" Else MsgBox "no" ' Выведет: no v = "120 test" If IsNumeric(v) Then MsgBox "yes" Else MsgBox "no" ' Выведет: no
К сожалению, как видим из примера, нет возможности проверить, содержится ли в строке число с плавающей точкой.
Пример 5. Определение содержит ли переменная дату (может быть преобразована в дату).
Dim firstDate, secondDate As Date Dim timeOnly, dateAndTime, noDate As String firstDate = CDate("12.05.2017") secondDate = #12/5/2017# timeOnly = "15:45" dateAndTime = "12.05.2017 15:45" noDate = "Test" If IsDate(firstDate) Then MsgBox "yes" Else MsgBox "no" ' Выведет: yes If IsDate(secondDate) Then MsgBox "yes" Else MsgBox "no" ' Выведет: yes If IsDate(timeOnly) Then MsgBox "yes" Else MsgBox "no" ' Выведет: yes If IsDate(dateAndTime) Then MsgBox "yes" Else MsgBox "no" ' Выведет: yes If IsDate(noDate) Then MsgBox "yes" Else MsgBox "no" ' Выведет: no
Проверка, содержится ли число или дата в ячейке листа делается аналогично, как и с переменными.
Помимо этих способов можно конечно еще придумать и другие, например, проверку строки с данными регулярным выражением или пройти по каждому символу в цикле и проверить цифра это или нет и тому подобное. Но на мой взгляд, описанных мной способов вполне достаточно для решения повседневных задач.
Содержание
- VBA Excel. Проверка переменных и выражений
- Проверка переменных и выражений
- Функция IsArray
- Описание функции
- Пример с IsArray
- Функция IsDate
- Описание функции
- Пример с IsDate
- Функция IsEmpty
- Описание функции
- Пример с IsEmpty
- Функция IsError
- Описание функции
- Пример с IsError
- Метод Validation.Add (Excel)
- Синтаксис
- Параметры
- Замечания
- Пример
- Поддержка и обратная связь
- Проверка свойств и значений и Информационные функции
VBA Excel. Проверка переменных и выражений
Проверка переменных и выражений с помощью встроенных функций VBA Excel: IsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull, IsNumeric, IsObject.
Проверка переменных и выражений
Встроенные функции VBA Excel — IsArray, IsDate, IsEmpty, IsError, IsMissing, IsNull, IsNumeric, IsObject — проверяют значения переменных и выражений на соответствие определенному типу данных или специальному значению.
Синтаксис функций для проверки переменных и выражений:
Expression — выражение, переменная или необязательный аргумент для IsMissing.
Все функции VBA Excel для проверки переменных и выражений являются логическими и возвращают значение типа Boolean — True или False.
Функция IsArray
Описание функции
Функция IsArray возвращает значение типа Boolean, указывающее, является ли переменная массивом:
- True — переменная является массивом;
- False — переменная не является массивом.
Пример с IsArray
Как показывает пример, функция IsArray возвращает True и в том случае, если переменная только объявлена как массив, но еще не содержит значений.
Функция IsDate
Описание функции
Функция IsDate возвращает логическое значение, указывающее, содержит ли переменная значение, которое можно интерпретировать как дату:
- True — переменная содержит дату, выражение возвращает дату, переменная объявлена с типом As Date;
- False — в иных случаях.
Пример с IsDate
Функция IsEmpty
Описание функции
Функция IsEmpty возвращает значение типа Boolean, указывающее, содержит ли переменная общего типа (As Variant) значение Empty:
- True — переменная содержит значение Empty;
- False — переменной присвоено значение, отличное от Empty.
Пример с IsEmpty
Как видно из примера, функцию IsEmpty можно использовать для проверки ячеек на содержание значения Empty (пустая ячейка общего формата).
Функция IsError
Описание функции
Функция IsError возвращает логическое значение, указывающее, является ли аргумент функции значением ошибки, определенной пользователем:
- True — аргумент функции является значением ошибки, определенной пользователем;
- False — в иных случаях.
Пользователь может определить одну или несколько ошибок для своей процедуры или функции с рекомендациями действий по ее (их) исправлению. Возвращается номер ошибки с помощью функции CVErr.
Пример с IsError
Допустим, пользователь определил, что ошибка №25 означает несоответствие аргумента функции Vkuba числовому формату:
Источник
Метод Validation.Add (Excel)
Добавляет проверку данных в указанный диапазон.
Синтаксис
expression. Добавить (Type, AlertStyle, Operator, Formula1, Formula2)
Выражение Переменная, представляющая объект Проверки .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Тип | Обязательный | XlDVType | Тип проверки. |
AlertStyle | Необязательный | Variant | Стиль оповещения проверки. Может быть одной из следующих констант XlDVAlertStyle : xlValidAlertInformation, xlValidAlertStop или xlValidAlertWarning. |
Operator | Необязательный | Variant | Оператор проверки данных. Может быть одной из следующих констант XlFormatConditionOperator: xlBetween, xlEqual, xlGreaterEqual, xlLess, xlLess, xlLessEqual, xlNotBetween или xlNotEqual. |
Formula1 | Необязательный | Variant | Первая часть уравнения проверки данных. Значение не должно превышать 255 символов. |
Formula2 | Необязательный | Variant | Вторая часть уравнения проверки данных, если оператор имеет значение xlBetween или xlNotBetween (в противном случае этот аргумент игнорируется). |
Замечания
Метод Add требует различных аргументов в зависимости от типа проверки, как показано в следующей таблице.
Тип проверки | Аргументы |
---|---|
xlValidateCustom | Формула 1 является обязательной, формула 2 игнорируется. Формула 1 должна содержать выражение, которое имеет значение True , если ввод данных является допустимым, и False , если ввод данных недопустим. |
xlInputOnly | Используются AlertStyle, Formula1 или Formula2. |
xlValidateList | Формула 1 является обязательной, формула 2 игнорируется. Формула 1 должна содержать список значений с разделителями-запятыми или ссылку на этот список на листе. |
xlValidateWholeNumber, xlValidateDate, xlValidateDecimal, xlValidateTextLength или xlValidateTime | Необходимо указать одну из формул Formula1 или Formula2 , в противном случае можно указать оба варианта. |
Пример
В этом примере добавляется проверка данных в ячейку E5.
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Источник
Проверка свойств и значений и Информационные функции
- ЯЧЕЙКА (CELL) — Определяет информацию о формате, местоположении или содержимом ячейки.
ЯЧЕЙКА(тип_инфо; ссылка) Если в качестве перв
- Тип_инфо — текстовое значение, определяющее тип информации о ячейке. Доступны следующие типы:
- адрес («address») — текстовое представление адреса ячейки, записанной в аргументе ссылка . Адрес отображается в соответствии с текущим стилем ссылок.
- столбец («col») — Номер столбца ячейки в ссылке.
- цвет («color») — вернет 1, если форматом ячейки(правая кнопка мыши -Формат ячейки) установлено изменение цвета отрицательных значений в зависимости от значения в ячейке. Например, если это один из предустановленных финансовых форматов, при котором отрицательные значения в ячейке отображаются красным. При этом совершенно не важно какое на данный момент значение в ячейке и какого оно цвета.
Если изменение цвета не предусмотрено форматом ячейки, функция вернет 0. - содержимое («contents») — по сути текст или число, записанное в ячейке или возвращаемое формулой, записанной в этой ячейке
- имяфайла («filename») — Имя файла в текстовом виде (включая полный путь), содержащего ссылку. Возвращает пустой текст («»), если книга с листом, содержащим ссылку, еще не сохранена. Имеет свои нюансы, подробнее о которых можно почитать в статье Как получить имя листа формулой
- формат («format») — Текстовое значение, соответствующее числовому формату ячейки. Возвращает «-» в конце текстового значения, если ячейка форматирована для вывода отрицательных значений другим цветом. Возвращает «()» в конце текстового значения, если ячейка форматирована для вывода положительных чисел в скобках. Доступные возвращаемые значения для различных форматов:
Формат Возвращаемое значение Основной G 0 «F0» 0,00 «F2» # ##0 «,0» # ##0,00 «,2» # ##0 _р_.;-# ##0 _р_. «,0» # ##0 _р_.;[Красный]-# ##0 _р_. «,0-« # ##0,00 _р_.;-# ##0,00 _р_. «,2» # ##0,00 _р_.;[Красный]-# ##0,00 _р_. «,2-« 0% «P0» 0,00% «P2» 0,00E+00 «S2» ##0,0E+0 «S1» #» «?/? или #» «??/?? «G» Д.ММ.ГГ или Д.МММ.ГГ или Д.ММ.ГГ ч:мм «D1» Д.МММ «D2» МММ.ГГ «D3» ч:мм AM/PM «D7» ч:мм:сс AM/PM «D6» ч:мм «D9» ч:мм:сс «D8» мм:сс,0 «G» [ч]:мм:сс «G» 0;[Зеленый]0 «F0-« - скобки («parentheses») — 1, если ячейка форматирована для вывода чисел (в том числе только положительных) в скобках. В ином случае возвращает 0.
- префикс («prefix») — Текстовое значение, соответствующее «метке-префиксу» ячейки. Вернет символ апострофа( ‘ ), если текст в ячейке выровнен влево; символ двойная кавычка( « ), если текст в ячейке выровнен вправо; символ( ^ ), если текст в ячейке выровнен по центру; символ обратной косой черты( ), если текст в ячейке выровнен по обоим краям. Функция вернет пустую строку( «» ), если ячейка содержит что-либо другое, отличное от текста
- защита («protect») — 0, если ячейка не заблокирована, и 1, если ячейка заблокирована. Подробнее про блокирование ячеек можно узнать из этой статьи — Как разрешить изменять только выбранные ячейки?. Функция не определяет, защищен ли в данный момент лист.
- строка («row») — Номер строки ячейки в ссылке.
- тип («type») — Текстовое значение, означающее тип данных в ячейке. Возвращает «b» , если ячейка пустая; «l» — если ячейка содержит текстовую константу; «v» — если ячейка содержит значение иного типа.
- ширина («width») — Ширина столбца ячейки, округленная до ближайшего целого. Ширина определяется на основании ширины символа текущего шрифта для ячейки.
- Ссылка — ссылка на ячейку, данные о которой требуется получить. Если указано более одной ячейки, то информация будет возвращено только для верхней левой ячейки указанного диапазона
Если функция была применена к ячейке и после этого у ячейки, заданной аргументом ссылка был изменен формат, ширина столбца или защита, то для получения корректной информации о текущем состоянии ячейки(в зависимости от типа информации) необходимо заново вычислить функцию или нажать Shift+F9 для вычисления всех формул листа.
Некоторые примеры применения:
=ЯЧЕЙКА(«строка»; A20 ) вернет 20
=ЯЧЕЙКА(«формат»; A1 ) вернет «D2» при условии, что к ячейке A1 применен формат «Д-МММ»
=ЯЧЕЙКА(«содержимое»; A2 ) вернет текст «ВСЕГО», если в ячейке A2 записан текст «ВСЕГО»
У функции ЯЧЕЙКА есть нюанс: т.к. в качестве аргумента принимается текстовая константа, то написанная в русской версии Excel эта константа не будет работать в других локализациях. Например, если записать на листе:
=ЯЧЕЙКА(«строка»; A20 )
сохранить и открыть файл в английскоязычном Excel, то функция вернет значение ошибки, а в ячейке функция будет записана так: =CELL(«строка», A20 ) . Т.е. название функции будет преобразовано в её английское написание, но текстовая константа — нет. Для обеспечения совместимости необходимо использовать английские названия констант:
=ЯЧЕЙКА(«row»;A20)
Такое написание констант будет корректно работать в любой локализации, т.к. является для Excel «интернациональным»(тот же трюк работает и с функцией ИНФОРМ (INFO) )
Значение_ошибки — значение ошибки, номер которой необходимо определить. Как правило ссылка на ячейку с формулой, чтобы определить, не возвращает ли формула ошибку. При необходимости определяется конкретный тип ошибки. Всего доступно 7 вариантов возвращаемых значений:
1 — #ПУСТО! (#EMPTY!)
2 — #ДЕЛ/0! (#DIV/0)
3 — #ЗНАЧ! (#VALUE!)
4 — #ССЫЛКА! (#REF!)
5 — #ИМЯ? (#NAME?)
6 — #ЧИСЛО! (#NUM!)
7 — #Н/Д (#N/A)
Если в ячейке содержится любое другое значение(не ошибочное), функция вернет значение ошибки #Н/Д (#N/A) .
Пример применения:
=ЕСЛИ(ТИП.ОШИБКИ( A10 )=4; «Неверная ссылка»; A10 )
=IF(ERROR.TYPE(A10)=4, «Wrong reference», A10)
ИНФОРМ(тип_инфо)
Тип_инфо — текстовая константа, означающая тип возвращаемой информации.
=ИНФОРМ(«КАТАЛОГ»)
=ИНФОРМ(«ВЕРСИЯОС»)
=ИНФОРМ(«ПЕРЕВЫЧИСЛИТЬ»)
=INFO(«directory»)
=INFO(«osversion»)
=INFO(«recalc»)
Доступны следующие варианты:
- КАТАЛОГ («directory») — Путь текущего каталога
- ЧИСЛОФАЙЛОВ («numfile») — Количество рабочих листов во всех открытых книгах Excel. При этом подсчитываются абсолютно все листы всех книг, даже если листы скрыты и если это листы надстроек и скрытых книг. Поэтому если хотите подсчитать только отображенные листы данная функция не поможет, т.к. у пользователя могут быть активны надстройки вроде Пакета анализа и Поиска решения, листы которых так же будут подсчитаны.
- ИСТОЧНИК («origin») — Возвращается абсолютная ссылка на левую верхнюю видимую в текущем окне ячейку с учетом состояния прокрутки листа. Ссылка возвращается в виде текста с префиксом «$A:» . Применяется для совместимости с Lotus 1-2-3 версий 3.x. Возвращаемое значение зависит от текущих настроек стиля ссылок. Например, если верхняя левая ячейка в окне — ячейка H5, то функция ИНФОРМ вернет следующий текст:
- Стиль ссылок A1: «$A:$H$5»
- Стиль ссылок R1C1: «$A:R5C8»
- ВЕРСИЯОС («osversion») — Возвращает сведения о версии операционной системы, в которой запущен Excel. Однако, если используется 64-разрядная версия ОС, а Excel установлен из пакета 32-бита, то и версия будет идентифицирована как 32-битная. Связано с тем, что функция определяет основные исполняемые файлы приложения и в зависимости именно от их битности выдаст результат. Это может ввести в заблуждение, т.к. тот же офис 365 определяется именно как 32-битный, даже если устанавливался на 64-битную ОС из 64-битного пакета.
- ПЕРЕВЫЧИСЛИТЬ («recalc») — Текущий режим вычисления формул. Функция возвращает «Автоматически» или «Вручную», в зависимости от того, какой режим выставлен в настройках. Более подробно про режим вычислений можно узнать в статье: Формулы перестали считать — как исправить?
- ВЕРСИЯ («release») — Версия Microsoft Excel в виде текста. Для Excel 2003 вернет «11.0», 2007 — «12.0», 2010 — «14.0», 2013 — «15.0», 2016(а так же 365) — «16.0»
- СИСТЕМА («system») — Возвращает название операционной среды, в которой запущен Excel. Macintosh(MAC OS) = «mac», Windows = «pcdos»
- Приведенные ниже типы применимы только в версиях Excel 2003 и более ранних. Начиная с Excel 2007 данные типы не используются и функция вернет значение ошибки #ЗНАЧ! (#VALUE!) :
- ПАМЯТЬВСЕГО («totmem») — Общее количество доступной памяти в байтах, включая уже используемую
- ДОСТУПНАЯПАМЯТЬ («memavail») — Количество свободной памяти в байтах
- ИСПОЛЬЗУЕМАЯПАМЯТЬ («memused») — Количество памяти, используемой для данных
С функцией ИНФОРМ есть один нюанс: т.к. в качестве аргумента принимается текстовая константа, то написанная в русской версии Excel эта константа не будет работать в других локализациях. Например, если записать на листе:
=ИНФОРМ(«ВЕРСИЯОС»)
сохранить и открыть файл в английскоязычном Excel, то функция вернет значение ошибки, а в ячейке функция будет записана так: =INFO(«ВЕРСИЯОС») . Т.е. название функции будет преобразовано в её английское написание, но текстовая константа — нет. Как же обеспечить совместимость? Все просто. Надо использовать английские названия констант:
=ИНФОРМ(«osversion»)
Такое написание констант будет корректно работать в любой локализации, т.к. является для Excel «интернациональным»(тот же трюк работает и с другой функцией, работающей с набором текстовых констант — ЯЧЕЙКА (CELL) )
=ЕПУСТО(значение)
значение — ссылка на ячейку или именованный диапазон, значение которого необходимо проверить на наличие пустого значения. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
=ЕПУСТО( A1 )
Что важно помнить, при работе с этой функцией: если в проверяемой ячейке записана формула, то такая ячейка всегда будет считаться не пустой и функция ЕПУСТО вернет значение ЛОЖЬ (FALSE) , даже если при этом формула в проверяемой ячейке возвращает пустую строку( =»» ).
=ЕОШ(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Чаще всего используется вместе с вложенными функциями, которые могут вернуть значение ошибки(например, функция ПОИСК или НАЙТИ), кроме ошибки #Н/Д (#N/A) :
=ЕОШ(( A1 )
=ЕСЛИ(ЕОШ((НАЙТИ(«дом»; A1 ));»»;ПСТР( A1 ;1;НАЙТИ(«дом»; A1 )-1))
где в A1 текст для поиска значения «дом». Если значение в ячейке есть — функция возвращает текст до этого значения
Чтобы обработать исключительно ошибку #Н/Д (#N/A) используется функция ЕНД
Пример применения функции можно посмотреть в этой статье — Как в ячейке с формулой вместо ошибки показать 0
=ЕОШИБКА(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Применяется для обработки функций, которые могут вернуть значение ошибки или проверки ячеек, содержащих такие функции:
=ЕОШИБКА( A1 )
=ЕСЛИ(ЕОШИБКА(ВПР( A1 ;B2:F10;2;0));»»;ВПР( A1 ;B2:F10;2;0))
Если ВПР не найдет значение(вернет ошибку #Н/Д) или возвращаемое значение будет содержать любую ошибку, то формула вернет пустую строку. В противном случае — будет вычислена ВПР
Пример применения функции можно посмотреть в этой статье — Как в ячейке с формулой вместо ошибки показать 0
Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР
=ЕНД(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Очень похожа на ЕОШ и ЕОШИБКА , но работает исключительно с типом ошибок #Н/Д (#N/A) . Поэтому применяется в основном вместе с функциями вроде ВПР (VLOOKUP) и ПОИСКПОЗ (MATCH) . Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР
=ЕЧЁТН(число)
число — непосредственно значение или ссылка на ячейку с числом. Число может быть положительным или отрицательным. 0 будет считаться четным. Если значение является не целым числом, то дробная часть числа отбрасывается(например, 2,5 будет преобразовано в 2). Если значение не является числом, то функция возвращает значение ошибки #ЗНАЧ! (#VALUE!) . В версиях 2007 и ниже функция может быть недоступна. В этом случае необходимо установить надстройку Пакет Анализа, а затем подключить его с помощью команды Надстройки из меню.
=ЕЧЁТН(-1) вернет ЛОЖЬ
=ЕЧЁТН(2,5) вернет ИСТИНА
=ЕЧЁТН(5) вернет ЛОЖЬ
=ЕНЕЧЁТ(число)
число — непосредственно значение или ссылка на ячейку с числом. Число может быть положительным или отрицательным. 0 будет считаться четным, т.е. функция вернет ЛОЖЬ (FALSE) . Если значение является не целым числом, то дробная часть числа отбрасывается(например, 2,5 будет преобразовано в 2). Если значение не является числом, то функция возвращает значение ошибки #ЗНАЧ! (#VALUE!) . В версиях 2007 и ниже функция может быть недоступна. В этом случае необходимо установить надстройку Пакет Анализа, а затем подключить его с помощью команды Надстройки из меню.
=ЕНЕЧЁТ(-1) вернет ИСТИНА
=ЕНЕЧЁТ(2,5) вернет ЛОЖЬ
=ЕНЕЧЁТ(5) вернет ИСТИНА
=ЕЛОГИЧ(значение)
значение — непосредственно значение или ссылка на ячейку, а также формула или функция.
=ЕНЕТЕКСТ(значение)
Самое важное, что стоит помнить в этой функции — она вернет ИСТИНА, если аргумент значение является ссылкой на пустую ячейку.
=ЕЧИСЛО(значение)
Отличие этой функции от функции ЕНЕТЕКСТ (ISNONTEXT) в том, что если аргументом значение будет логическое ИСТИНА или ЛОЖЬ или значение ошибки, то функция ЕНЕТЕКСТ вернет ИСТИНА, в то время как ЕЧИСЛО вернет ЛОЖЬ.
=ЕССЫЛКА(значение)
значение — ссылка на одну ячейку, диапазон ячеек или именованный диапазон. Если аргумент является текстом или несуществующей ячейкой, функция вернет ЛОЖЬ. Как правило ЕССЫЛКА используется в случаях, когда другие функции используют данные с других листов, которые могут быть удалены.
=ЕСЛИ(ЕССЫЛКА(Лист4!A1:C10);ВПР( A1 ;Лист4!A1:C10;3;0);ВПР( A1 ;Лист2!A1:C10;3;0))
=IF(ISREF(Лист4!A1:C10),VLOOKUP(A1,Лист4!A1:C10,3,0),VLOOKUP(A1,Лист2!A1:C10,3,0))
В этом случае функция ЕССЫЛКА будет возвращать ИСТИНА (TRUE) , если Лист4 присутствует в книге и тогда ВПР будет брать данные с этого листа. Если же Лист4 будет удален — ВПР будет брать данные с листа Лист2 . Это более корректно, чем применение ЕОШИБКА или подобные им, т.к. ВПР может возвращать значение ошибки с самого листа Лист2 , например, если искомые данные отсутствуют на листе.
Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР
=ЕТЕКСТ(значение)
значение — непосредственно значение или ссылка на ячейку, значение которой необходимо проверить. Если аргументом значение будет логическое ИСТИНА или ЛОЖЬ или значение ошибки, то функция ЕТЕКСТ вернет ЛОЖЬ.
Главное, о чем стоит помнить, применяя функцию это то, что если число в ячейке записано как текст(«2»), функция вернет ИСТИНА. Т.е. функция проверяет именно тип данных, а не возможность работы со значением как с числом.
=Ч(значение)
значение — произвольное значение или ссылка на ячейку со значением. Если значение является значением любой из ошибок Excel(#ДЕЛ/0! (#DIV/0) , #ЗНАЧ! (#VALUE!) , #ССЫЛКА! (#REF!) , #ИМЯ? (#NAME?) , #ЧИСЛО! (#NUM!) , #Н/Д (#N/A) ), то функция вернет значение этой ошибки. Преобразование не будет выполнено.
Остальные типы данных преобразуются по следующим правилам:
- Число или число, записанное как текст — будет преобразовано в это же число, которое является реальным числом
- Дата в одном из встроенных форматов Microsoft Excel — будет преобразована в дату в числовом формате(чуть более подробно о представлении дат в Excel можно узнать из статьи: Как Excel воспринимает данные?)
- ИСТИНА — будет преобразовано в 1
- любой другой тип данных — будет преобразован в 0
Источник
Главная » Функции Excel »
Проверка свойств и значений и Информационные функции
28 Апрель 2011 46728 просмотров
- ЯЧЕЙКА(CELL) — Определяет информацию о формате, местоположении или содержимом ячейки.
ЯЧЕЙКА(тип_инфо; ссылка)Если в качестве перв- Тип_инфо — текстовое значение, определяющее тип информации о ячейке. Доступны следующие типы:
- адрес(«address») — текстовое представление адреса ячейки, записанной в аргументе ссылка. Адрес отображается в соответствии с текущим стилем ссылок.
- столбец(«col») — Номер столбца ячейки в ссылке.
- цвет(«color») — вернет 1, если форматом ячейки(правая кнопка мыши -Формат ячейки) установлено изменение цвета отрицательных значений в зависимости от значения в ячейке. Например, если это один из предустановленных финансовых форматов, при котором отрицательные значения в ячейке отображаются красным. При этом совершенно не важно какое на данный момент значение в ячейке и какого оно цвета.
Если изменение цвета не предусмотрено форматом ячейки, функция вернет 0. - содержимое(«contents») — по сути текст или число, записанное в ячейке или возвращаемое формулой, записанной в этой ячейке
- имяфайла(«filename») — Имя файла в текстовом виде (включая полный путь), содержащего ссылку. Возвращает пустой текст («»), если книга с листом, содержащим ссылку, еще не сохранена. Имеет свои нюансы, подробнее о которых можно почитать в статье Как получить имя листа формулой
- формат(«format») — Текстовое значение, соответствующее числовому формату ячейки. Возвращает «-» в конце текстового значения, если ячейка форматирована для вывода отрицательных значений другим цветом. Возвращает «()» в конце текстового значения, если ячейка форматирована для вывода положительных чисел в скобках. Доступные возвращаемые значения для различных форматов:
Формат Возвращаемое значение Основной G 0 «F0» 0,00 «F2» # ##0 «,0» # ##0,00 «,2» # ##0 _р_.;-# ##0 _р_. «,0» # ##0 _р_.;[Красный]-# ##0 _р_. «,0-« # ##0,00 _р_.;-# ##0,00 _р_. «,2» # ##0,00 _р_.;[Красный]-# ##0,00 _р_. «,2-« 0% «P0» 0,00% «P2» 0,00E+00 «S2» ##0,0E+0 «S1» #» «?/? или #» «??/?? «G» Д.ММ.ГГ или Д.МММ.ГГ или Д.ММ.ГГ ч:мм «D1» Д.МММ «D2» МММ.ГГ «D3» ч:мм AM/PM «D7» ч:мм:сс AM/PM «D6» ч:мм «D9» ч:мм:сс «D8» мм:сс,0 «G» [ч]:мм:сс «G» 0;[Зеленый]0 «F0-« - скобки(«parentheses») — 1, если ячейка форматирована для вывода чисел (в том числе только положительных) в скобках. В ином случае возвращает 0.
- префикс(«prefix») — Текстовое значение, соответствующее «метке-префиксу» ячейки. Вернет символ апострофа(‘), если текст в ячейке выровнен влево; символ двойная кавычка(«), если текст в ячейке выровнен вправо; символ(^), если текст в ячейке выровнен по центру; символ обратной косой черты(), если текст в ячейке выровнен по обоим краям. Функция вернет пустую строку(«»), если ячейка содержит что-либо другое, отличное от текста
- защита(«protect») — 0, если ячейка не заблокирована, и 1, если ячейка заблокирована. Подробнее про блокирование ячеек можно узнать из этой статьи — Как разрешить изменять только выбранные ячейки?. Функция не определяет, защищен ли в данный момент лист.
- строка(«row») — Номер строки ячейки в ссылке.
- тип(«type») — Текстовое значение, означающее тип данных в ячейке. Возвращает «b», если ячейка пустая; «l» — если ячейка содержит текстовую константу; «v» — если ячейка содержит значение иного типа.
- ширина(«width») — Ширина столбца ячейки, округленная до ближайшего целого. Ширина определяется на основании ширины символа текущего шрифта для ячейки.
- Ссылка — ссылка на ячейку, данные о которой требуется получить. Если указано более одной ячейки, то информация будет возвращено только для верхней левой ячейки указанного диапазона
Если функция была применена к ячейке и после этого у ячейки, заданной аргументом ссылка был изменен формат, ширина столбца или защита, то для получения корректной информации о текущем состоянии ячейки(в зависимости от типа информации) необходимо заново вычислить функцию или нажать Shift+F9 для вычисления всех формул листа.
Некоторые примеры применения:
=ЯЧЕЙКА(«строка»;A20) вернет 20
=ЯЧЕЙКА(«формат»;A1) вернет «D2» при условии, что к ячейке A1 применен формат «Д-МММ»
=ЯЧЕЙКА(«содержимое»; A2) вернет текст «ВСЕГО», если в ячейке A2 записан текст «ВСЕГО»
У функции ЯЧЕЙКА есть нюанс: т.к. в качестве аргумента принимается текстовая константа, то написанная в русской версии Excel эта константа не будет работать в других локализациях. Например, если записать на листе:
=ЯЧЕЙКА(«строка»;A20)
сохранить и открыть файл в английскоязычном Excel, то функция вернет значение ошибки, а в ячейке функция будет записана так: =CELL(«строка»,A20). Т.е. название функции будет преобразовано в её английское написание, но текстовая константа — нет. Для обеспечения совместимости необходимо использовать английские названия констант:
=ЯЧЕЙКА(«row»;A20)
Такое написание констант будет корректно работать в любой локализации, т.к. является для Excel «интернациональным»(тот же трюк работает и с функцией ИНФОРМ(INFO)) - Тип_инфо — текстовое значение, определяющее тип информации о ячейке. Доступны следующие типы:
- ТИП.ОШИБКИ(ERROR.TYPE) — Определяет номер, соответствующий одному из типов ошибок Microsoft Excel. Чаще всего применяется в составе логических функций типа ЕСЛИ(IF) для проверки результата вычисления функций.ТИП.ОШИБКИ(значение_ошибки)
Значение_ошибки — значение ошибки, номер которой необходимо определить. Как правило ссылка на ячейку с формулой, чтобы определить, не возвращает ли формула ошибку. При необходимости определяется конкретный тип ошибки. Всего доступно 7 вариантов возвращаемых значений:
1 — #ПУСТО!(#EMPTY!)
2 — #ДЕЛ/0!(#DIV/0)
3 — #ЗНАЧ!(#VALUE!)
4 — #ССЫЛКА!(#REF!)
5 — #ИМЯ?(#NAME?)
6 — #ЧИСЛО!(#NUM!)
7 — #Н/Д(#N/A)
Если в ячейке содержится любое другое значение(не ошибочное), функция вернет значение ошибки #Н/Д(#N/A).
Пример применения:
=ЕСЛИ(ТИП.ОШИБКИ(A10)=4; «Неверная ссылка»; A10)
=IF(ERROR.TYPE(A10)=4, «Wrong reference», A10) - ИНФОРМ(INFO) — Выдает информацию о текущей операционной среде и некоторых свойствах приложения Excel. Однако данная функция давно не дорабатывалась и некоторые сведения могут быть неверными или выдавать ошибочный результат в версиях Excel 2007 и выше.
ИНФОРМ(тип_инфо)
Тип_инфо — текстовая константа, означающая тип возвращаемой информации.
=ИНФОРМ(«КАТАЛОГ»)
=ИНФОРМ(«ВЕРСИЯОС»)
=ИНФОРМ(«ПЕРЕВЫЧИСЛИТЬ»)
=INFO(«directory»)
=INFO(«osversion»)
=INFO(«recalc»)
Доступны следующие варианты:- КАТАЛОГ(«directory») — Путь текущего каталога
- ЧИСЛОФАЙЛОВ(«numfile») — Количество рабочих листов во всех открытых книгах Excel. При этом подсчитываются абсолютно все листы всех книг, даже если листы скрыты и если это листы надстроек и скрытых книг. Поэтому если хотите подсчитать только отображенные листы данная функция не поможет, т.к. у пользователя могут быть активны надстройки вроде Пакета анализа и Поиска решения, листы которых так же будут подсчитаны.
- ИСТОЧНИК(«origin») — Возвращается абсолютная ссылка на левую верхнюю видимую в текущем окне ячейку с учетом состояния прокрутки листа. Ссылка возвращается в виде текста с префиксом «$A:». Применяется для совместимости с Lotus 1-2-3 версий 3.x. Возвращаемое значение зависит от текущих настроек стиля ссылок. Например, если верхняя левая ячейка в окне — ячейка H5, то функция ИНФОРМ вернет следующий текст:
- Стиль ссылок A1: «$A:$H$5»
- Стиль ссылок R1C1: «$A:R5C8»
- ВЕРСИЯОС(«osversion») — Возвращает сведения о версии операционной системы, в которой запущен Excel. Однако, если используется 64-разрядная версия ОС, а Excel установлен из пакета 32-бита, то и версия будет идентифицирована как 32-битная. Связано с тем, что функция определяет основные исполняемые файлы приложения и в зависимости именно от их битности выдаст результат. Это может ввести в заблуждение, т.к. тот же офис 365 определяется именно как 32-битный, даже если устанавливался на 64-битную ОС из 64-битного пакета…
- ПЕРЕВЫЧИСЛИТЬ(«recalc») — Текущий режим вычисления формул. Функция возвращает «Автоматически» или «Вручную», в зависимости от того, какой режим выставлен в настройках. Более подробно про режим вычислений можно узнать в статье: Формулы перестали считать — как исправить?
- ВЕРСИЯ(«release») — Версия Microsoft Excel в виде текста. Для Excel 2003 вернет «11.0», 2007 — «12.0», 2010 — «14.0», 2013 — «15.0», 2016(а так же 365) — «16.0»
- СИСТЕМА(«system») — Возвращает название операционной среды, в которой запущен Excel. Macintosh(MAC OS) = «mac», Windows = «pcdos»
- Приведенные ниже типы применимы только в версиях Excel 2003 и более ранних. Начиная с Excel 2007 данные типы не используются и функция вернет значение ошибки #ЗНАЧ!(#VALUE!):
- ПАМЯТЬВСЕГО(«totmem») — Общее количество доступной памяти в байтах, включая уже используемую
- ДОСТУПНАЯПАМЯТЬ(«memavail») — Количество свободной памяти в байтах
- ИСПОЛЬЗУЕМАЯПАМЯТЬ(«memused») — Количество памяти, используемой для данных
С функцией ИНФОРМ есть один нюанс: т.к. в качестве аргумента принимается текстовая константа, то написанная в русской версии Excel эта константа не будет работать в других локализациях. Например, если записать на листе:
=ИНФОРМ(«ВЕРСИЯОС»)
сохранить и открыть файл в английскоязычном Excel, то функция вернет значение ошибки, а в ячейке функция будет записана так: =INFO(«ВЕРСИЯОС»). Т.е. название функции будет преобразовано в её английское написание, но текстовая константа — нет. Как же обеспечить совместимость? Все просто. Надо использовать английские названия констант:
=ИНФОРМ(«osversion»)
Такое написание констант будет корректно работать в любой локализации, т.к. является для Excel «интернациональным»(тот же трюк работает и с другой функцией, работающей с набором текстовых констант — ЯЧЕЙКА(CELL)) - ЕПУСТО(ISBLANK) — Выдает логическое значение ИСТИНА, если аргумент является ссылкой на пустую ячейку.
=ЕПУСТО(значение)
значение — ссылка на ячейку или именованный диапазон, значение которого необходимо проверить на наличие пустого значения. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
=ЕПУСТО(A1)
Что важно помнить, при работе с этой функцией: если в проверяемой ячейке записана формула, то такая ячейка всегда будет считаться не пустой и функция ЕПУСТО вернет значение ЛОЖЬ(FALSE), даже если при этом формула в проверяемой ячейке возвращает пустую строку(=»»). - ЕОШ(ISERR) — Выдает логическое значение ИСТИНА(TRUE), если аргумент ссылается на любое значение ошибки, кроме #Н/Д(#N/A).
=ЕОШ(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Чаще всего используется вместе с вложенными функциями, которые могут вернуть значение ошибки(например, функция ПОИСК или НАЙТИ), кроме ошибки #Н/Д(#N/A):
=ЕОШ((A1)
=ЕСЛИ(ЕОШ((НАЙТИ(«дом»;A1));»»;ПСТР(A1;1;НАЙТИ(«дом»;A1)-1))
где в A1 текст для поиска значения «дом». Если значение в ячейке есть — функция возвращает текст до этого значения
Чтобы обработать исключительно ошибку #Н/Д(#N/A) используется функция ЕНД
Пример применения функции можно посмотреть в этой статье — Как в ячейке с формулой вместо ошибки показать 0 - ЕОШИБКА(ISERROR) — Выдает логическое значение ИСТИНА, если аргумент ссылается на любое значение ошибки
=ЕОШИБКА(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Применяется для обработки функций, которые могут вернуть значение ошибки или проверки ячеек, содержащих такие функции:
=ЕОШИБКА(A1)
=ЕСЛИ(ЕОШИБКА(ВПР(A1;B2:F10;2;0));»»;ВПР(A1;B2:F10;2;0))
Если ВПР не найдет значение(вернет ошибку #Н/Д) или возвращаемое значение будет содержать любую ошибку, то формула вернет пустую строку. В противном случае — будет вычислена ВПР
Пример применения функции можно посмотреть в этой статье — Как в ячейке с формулой вместо ошибки показать 0
Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР - ЕНД(ISNA) — Выдает логическое значение ИСТИНА, если аргумент ссылается на значение ошибки #Н/Д(#N/A)(значение недоступно).
=ЕНД(значение)
значение — непосредственно формула или значение, а так же ссылка на ячейку или именованный диапазон, которые необходимо проверить на наличие ошибки. Если ссылка содержит более одной ячейки, то функция проверит значение только одной — левой верхней ячейки.
Очень похожа на ЕОШ и ЕОШИБКА, но работает исключительно с типом ошибок #Н/Д(#N/A). Поэтому применяется в основном вместе с функциями вроде ВПР(VLOOKUP) и ПОИСКПОЗ(MATCH). Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР - ЕЧЁТН(ISEVEN) — Выдает логическое значение ИСТИНА(TRUE), если аргумент — четное число.
=ЕЧЁТН(число)
число — непосредственно значение или ссылка на ячейку с числом. Число может быть положительным или отрицательным. 0 будет считаться четным. Если значение является не целым числом, то дробная часть числа отбрасывается(например, 2,5 будет преобразовано в 2). Если значение не является числом, то функция возвращает значение ошибки #ЗНАЧ!(#VALUE!).В версиях 2007 и ниже функция может быть недоступна. В этом случае необходимо установить надстройку Пакет Анализа, а затем подключить его с помощью команды Надстройки из меню.
=ЕЧЁТН(-1) вернет ЛОЖЬ
=ЕЧЁТН(2,5) вернет ИСТИНА
=ЕЧЁТН(5) вернет ЛОЖЬ - ЕНЕЧЁТ(ISODD) — Выдает логическое значение ИСТИНА, если аргумент — нечетное число.
=ЕНЕЧЁТ(число)
число — непосредственно значение или ссылка на ячейку с числом. Число может быть положительным или отрицательным. 0 будет считаться четным, т.е. функция вернет ЛОЖЬ(FALSE). Если значение является не целым числом, то дробная часть числа отбрасывается(например, 2,5 будет преобразовано в 2). Если значение не является числом, то функция возвращает значение ошибки #ЗНАЧ!(#VALUE!).В версиях 2007 и ниже функция может быть недоступна. В этом случае необходимо установить надстройку Пакет Анализа, а затем подключить его с помощью команды Надстройки из меню.
=ЕНЕЧЁТ(-1) вернет ИСТИНА
=ЕНЕЧЁТ(2,5) вернет ЛОЖЬ
=ЕНЕЧЁТ(5) вернет ИСТИНА - ЕЛОГИЧ(ISLOGICAL) — Выдает логическое значение ИСТИНА, если аргумент ссылается на логическое значение.
=ЕЛОГИЧ(значение)
значение — непосредственно значение или ссылка на ячейку, а также формула или функция. - ЕНЕТЕКСТ(ISNONTEXT) — Выдает логическое значение ИСТИНА, если аргумент ссылается на значение, которое не является текстом.
=ЕНЕТЕКСТ(значение)
Самое важное, что стоит помнить в этой функции — она вернет ИСТИНА, если аргумент значение является ссылкой на пустую ячейку. - ЕЧИСЛО(ISNUMBER) — Выдает логическое значение ИСТИНА, если аргумент является числом.
=ЕЧИСЛО(значение)
Отличие этой функции от функции ЕНЕТЕКСТ(ISNONTEXT) в том, что если аргументом значение будет логическое ИСТИНА или ЛОЖЬ или значение ошибки, то функция ЕНЕТЕКСТ вернет ИСТИНА, в то время как ЕЧИСЛО вернет ЛОЖЬ. - ЕССЫЛКА(ISREF) — Выдает логическое значение ИСТИНА, если аргумент является рабочей ссылкой на существующую ячейку.
=ЕССЫЛКА(значение)
значение — ссылка на одну ячейку, диапазон ячеек или именованный диапазон. Если аргумент является текстом или несуществующей ячейкой, функция вернет ЛОЖЬ. Как правило ЕССЫЛКА используется в случаях, когда другие функции используют данные с других листов, которые могут быть удалены.
=ЕСЛИ(ЕССЫЛКА(Лист4!A1:C10);ВПР(A1;Лист4!A1:C10;3;0);ВПР(A1;Лист2!A1:C10;3;0))
=IF(ISREF(Лист4!A1:C10),VLOOKUP(A1,Лист4!A1:C10,3,0),VLOOKUP(A1,Лист2!A1:C10,3,0))
В этом случае функция ЕССЫЛКА будет возвращать ИСТИНА(TRUE), если Лист4 присутствует в книге и тогда ВПР будет брать данные с этого листа. Если же Лист4 будет удален — ВПР будет брать данные с листа Лист2. Это более корректно, чем применение ЕОШИБКА или подобные им, т.к. ВПР может возвращать значение ошибки с самого листа Лист2, например, если искомые данные отсутствуют на листе.
Подробнее про ВПР можно ознакомиться здесь: Как найти значение в другой таблице или сила ВПР - ЕТЕКСТ(ISTEXT) — Выдает логическое значение ИСТИНА, если аргумент является текстом.
=ЕТЕКСТ(значение)
значение — непосредственно значение или ссылка на ячейку, значение которой необходимо проверить. Если аргументом значение будет логическое ИСТИНА или ЛОЖЬ или значение ошибки, то функция ЕТЕКСТ вернет ЛОЖЬ.
Главное, о чем стоит помнить, применяя функцию это то, что если число в ячейке записано как текст(«2»), функция вернет ИСТИНА. Т.е. функция проверяет именно тип данных, а не возможность работы со значением как с числом. - Ч(N) — Преобразует заданное значение в число.
=Ч(значение)
значение — произвольное значение или ссылка на ячейку со значением. Если значение является значением любой из ошибок Excel(#ДЕЛ/0!(#DIV/0), #ЗНАЧ!(#VALUE!), #ССЫЛКА!(#REF!), #ИМЯ?(#NAME?), #ЧИСЛО!(#NUM!), #Н/Д(#N/A)), то функция вернет значение этой ошибки. Преобразование не будет выполнено.
Остальные типы данных преобразуются по следующим правилам:- Число или число, записанное как текст — будет преобразовано в это же число, которое является реальным числом
- Дата в одном из встроенных форматов Microsoft Excel — будет преобразована в дату в числовом формате(чуть более подробно о представлении дат в Excel можно узнать из статьи: Как Excel воспринимает данные?)
- ИСТИНА — будет преобразовано в 1
- любой другой тип данных — будет преобразован в 0
Наиболее часто функция применяется в формулах массива, когда необходимо игнорировать текстовые значения, а числа, записанные как текст преобразовать в реальные числа.
- НД(NA) — Выдает значение ошибки #Н/Д. Не имеет аргументов и записывается в ячейку обязательно со скобками: =НД()
- ТИП(TYPE) — Выдает тип значения.
=ТИП(значение)
значение — произвольное значение или ссылка на ячейку со значением.
Применяется в основном в случаях, когда результаты вычисления другой функции зависят от типа значения в конкретной ячейке. Наиболее актуальна была до появления VBA, когда для автоматизации применялись функции листов макросов. На данный момент используется гораздо реже.
Ниже приведены возвращаемые функцией значения и типы данных, им соответствующие:
1 — Число
2 — Текст
4 — Логическое значение
16 — Значение ошибки
64 — Массив
При помощи данной функции нельзя определить, содержится ли в ячейке формула. Эта функция всего лишь определяет тип результирующего (отображаемого) значения. Если аргумент «значение» является ссылкой на ячейку, содержащую формулу, функция ТИП возвращает тип результата вычисления формулы.
Некоторые примеры:
при условии, что в A1 записано значение «excel-vba.ru», т.е. текст
ТИП(«url = «&A1) функция вернет тип 2
ТИП(2+A1) сложение текста с числом вызовет ошибку(#ЗНАЧ!) и функция вернет тип 16
ТИП({1;2:3;4}) функция вернет тип 64 - ЕФОРМУЛА(ISFORMULA) — проверяет содержится ли в ячейке формула или нет и возвращает ИСТИНА, если ячейка содержит формулу и ЛОЖЬ, если значение в ячейке является константой.
=ЕФОРМУЛА(ссылка)
ссылка — ссылка на ячейку, которую необходимо проверить на наличие формулы. Если ссылка указывает на диапазон ячеек, то проверена будет лишь одна верхняя левая ячейка.
Примечание: функция вернет ИСТИНА даже в том случае, если в ячейке нет никакой функции, а просто записана ссылка на другую ячейку или диапазон ячеек: =B4
На чтение 19 мин. Просмотров 24.7k.
Пьер Корнель
Угадай, если сможешь, и выбери, если посмеешь
Содержание
- Краткое руководство по VBA If Statement
- Что такое IF и зачем оно тебе?
- Тестовые данные
- Формат операторов VBA If Then
- Простой пример If Then
- Условия IF
- Использование If ElseIf
- Использование If Else
- Используя If And/If Or
- Функция IIF
- Использование Select Case
- Попробуйте это упражнение
Краткое руководство по VBA If Statement
Описание | Формат | Пример |
If Then | If [условие верно] Then [действие] End If |
If score = 100 Then Debug.Print «Отлично» End If |
If Else | If [условие верно] Then [действие] Else [действие] End If |
If score = 100 Then Debug.Print «Отлично» Else Debug.Print «Попробуй снова» End If |
If ElseIf | If [1 условие верно] Then [действие] ElseIf [2 условие верно] Then [действие] End If |
If score = 100 Then Debug.Print «Отлично» ElseIf score > 50 Then Debug.Print «Пройдено» ElseIf score <= 50 Then Debug.Print «Попробуй снова» End If |
Else и ElseIf (Else должно идти после ElseIf’s) |
If [1 условие верно] Then [действие] ElseIf [2 условие верно] Then [действие] Else [действие] End If |
If score = 100 Then Debug.Print «Отлично» ElseIf score > 50 Then Debug.Print «Пройдено» ElseIf score > 30 Then Debug.Print «Попробуй снова» Else Debug.Print «Ой» End If |
If без Endif (Только одна строка) |
If [условие верно] Then [действие] |
If value <= 0 Then value = 0 |
В следующем коде показан простой пример использования
оператора VBA If
If Sheet1.Range("A1").Value > 5 Then Debug.Print "Значение больше 5." ElseIf Sheet1.Range("A1").Value < 5 Then Debug.Print "Значение меньше 5." Else Debug.Print "Значение равно 5." End If
Что такое IF и зачем оно тебе?
Оператор VBA If используется, чтобы позволить вашему коду
делать выбор, когда он выполняется.
Вам часто захочется сделать выбор на основе данных, которые
читает ваш макрос.
Например, вы можете захотеть читать только тех учеников, у
которых оценки выше 70. Когда вы читаете каждого учащегося, вы можете
использовать инструкцию If для проверки отметок каждого учащегося.
Важным словом в последнем предложении является проверка. Оператор
If используется для проверки значения, а затем для выполнения задачи на основе
результатов этой проверки.
Тестовые данные
Мы собираемся использовать следующие тестовые данные для
примеров кода в этом посте.
Формат операторов VBA If Then
Формат оператора If Then следующий
За ключевым словом If следуют условие и ключевое слово Then
Каждый раз, когда вы используете оператор If Then, вы должны использовать соответствующий оператор End If.
Когда условие оценивается как истинное, обрабатываются все
строки между If Then и End If.
If [условие верно] Then [строки кода] [строки кода] [строки кода] End If
Чтобы сделать ваш код более читабельным, рекомендуется
делать отступы между операторами If Then и End If.
Отступ между If и End If
Отступ означает просто переместить строку кода на одну вкладку вправо. Правило большого пальца состоит в том, чтобы сделать отступ между начальным и конечным операторами, такими как:
Sub … End Sub
If Then … End If
If Then… ElseIf … Else … Endif
For … Next
Do While … Loop
Select Case … End Case
Для отступа в коде вы можете выделить строки для отступа и нажать клавишу Tab. Нажатие клавиш Shift + Tab сделает отступ кода, т.е. переместит его на одну вкладку влево.
Вы также можете использовать значки на панели инструментов Visual Basic для отступа кода.
Если вы посмотрите на примеры кода на этом сайте, вы увидите, что код имеет отступ.
Простой пример If Then
Следующий код выводит имена всех студентов с баллами более 50.
Sub ChitatOcenki() Dim i As Long ' Пройдите столбцы отметок For i = 2 To 11 ' Проверьте, больше ли баллов,чем 50 If Sheet1.Range("C" & i).Value > 50 Then ' Напечатайте имя студента в «Immediate Window» (Ctrl + G) Debug.Print Sheet1.Range("A" & i).Value & " " & Sheet1.Range("B" & i).Value End If Next End Sub
Результаты:
- Василий Кочин
- Максим Бородин
- Дмитрий Маренин
- Олеся Клюева
- Евгений Яшин
Поэкспериментируйте с этим примером и проверьте значение или знак > и посмотрите, как изменились результаты.
Условия IF
Часть кода между ключевыми словами If и Then называется условием. Условие — это утверждение, которое оценивается как истинное или ложное. Они в основном используются с операторами Loops и If. При создании условия вы используете такие знаки, как «>, <, <>,> =, <=, =».
Ниже приведены примеры условий:
Условие | Это верно, когда |
x < 5 | x меньше,чем 5 |
x <= 5 | x меньше, либо равен 5 |
x > 5 | x больше, чем 5 |
x >= 5 | x больше, либо равен 5 |
x = 5 | x равен 5 |
x <> 5 | x не равен 5 |
x > 5 And x < 10 | x больше, чем 5 И x меньше, чем 10 |
x = 2 Or x >10 | x равен 2 ИЛИ x больше,чем 10 |
Range(«A1») = «Иван» | Ячейка A1 содержит текст «Иван» |
Range(«A1») <> «Иван» | Ячейка A1 не содержит текст «Иван» |
Вы могли заметить x = 5, как условие. Не стоит путать с х = 5, при использовании в качестве назначения.
Когда в условии используется «=», это означает, что «левая сторона равна правой стороне».
В следующей таблице показано, как знак равенства используется
в условиях и присваиваниях.
Использование «=» | Тип | Значение |
Loop Until x = 5 | Условие | Равен ли x пяти |
Do While x = 5 | Условие | Равен ли x пяти |
If x = 5 Then | Условие | Равен ли x пяти |
For x = 1 To 5 | Присваивание | Установите значение х = 1, потом = 2 и т.д. |
x = 5 | Присваивание | Установите х до 5 |
b = 6 = 5 | Присваивание и условие |
Присвойте b результату условия 6 = 5 |
x = MyFunc(5,6) | Присваивание | Присвойте х значение, возвращаемое функцией |
Последняя запись в приведенной выше таблице показывает
оператор с двумя равными. Первый знак равенства — это присвоение, а любые
последующие знаки равенства — это условия.
Поначалу это может показаться странным, но подумайте об этом
так. Любое утверждение, начинающееся с переменной и равно, имеет следующий
формат
[переменная] [=] [оценить эту часть]
Поэтому все, что находится справа от знака равенства, оценивается и результат помещается в переменную. Посмотрите на последние три строки таблицы, как:
[x] [=] [5]
[b] [=] [6 = 5]
[x] [=] [MyFunc (5,6)]
Использование If ElseIf
Инструкция ElseIf позволяет вам выбирать из нескольких вариантов. В следующем примере мы печатаем баллы, которые находятся в диапазоне.
Sub IspElseIf() If Marks >= 85 Then Debug.Print "Высший балл" ElseIf Marks >= 75 Then Debug.Print "Отлично" End If End Sub
Важно понимать, что порядок важен. Условие If проверяется
первым.
Если это правда, то печатается «Высший балл», и оператор If заканчивается.
Если оно ложно, то код переходит к следующему ElseIf и
проверяет его состояние.
Давайте поменяемся местами If и ElseIf из последнего
примера. Код теперь выглядит так
Sub IspElseIfNeverno() ' Этот код неверен, так как ElseIf никогда не будет верным If Marks >= 75 Then Debug.Print "Отлично" ElseIf Marks >= 85 Then ' код никогда не достигнет здесь Debug.Print "Высший балл" End If End Sub
В этом случае мы сначала проверяем значение более 75. Мы никогда не будем печатать «Высший балл», потому что, если значение больше 85, это вызовет первый оператор if.
Чтобы избежать подобных проблем, мы должны использовать два
условия. Они помогают точно указать, что вы ищете, чтобы избежать путаницы.
Пример ниже показывает, как их использовать. Мы рассмотрим более многочисленные
условия в разделе ниже.
If marks >= 75 And marks < 85 Then Debug.Print "Отлично" ElseIf marks >= 85 And marks <= 100 Then Debug.Print "Высший балл" End If
Давайте расширим оригинальный код. Вы можете использовать столько операторов ElseIf, сколько захотите. Мы добавим еще несколько, чтобы учесть все наши классификации баллов.
Использование If Else
Утверждение Else используется, как ловушка для всех. Это в основном означает «если бы не было условий» или «все остальное». В предыдущем примере кода мы не включили оператор печати для метки сбоя. Мы можем добавить это, используя Else.
Sub IspElse() If Marks >= 85 Then Debug.Print "Высший балл" ElseIf Marks >= 75 Then Debug.Print "Отлично" ElseIf Marks >= 55 Then Debug.Print "Хорошо" ElseIf Marks >= 40 Then Debug.Print "Удовлетворительно" Else ' Для всех других оценок Debug.Print "Незачет" End If End Sub
Так что, если это не один из других типов, то это провал.
Давайте напишем некоторый код с помощью наших примеров
данных и распечатаем студента и его классификацию.
Sub DobClass() ' получить последнюю строку Dim startRow As Long, lastRow As Long startRow = 2 lastRow = Sheet1.Cells(Sheet1.Rows.Count, 1).End(xlUp).Row Dim i As Long, Marks As Long Dim sClass As String ' Пройдите столбцы отметок For i = startRow To lastRow Marks = Sheet1.Range("C" & i).Value ' Проверьте отметки и классифицируйте соответственно If Marks >= 85 Then sClass = "Высший балл" ElseIf Marks >= 75 Then sClass = "Отлично" ElseIf Marks >= 55 Then sClass = "Хорошо" ElseIf Marks >= 40 Then sClass = "Удовлетворительно" Else ' Для всех других оценок sClass = "Незачет" End If ' Запишите класс в столбец E Sheet1.Range("E" & i).Value = sClass Next End Sub
Результаты выглядят так: в столбце E — классификация баллов
Используя If And/If Or
В выражении If может быть несколько условий. Ключевые слова VBA And и Or позволяют использовать несколько условий.
Эти слова работают так же, как вы используете их на
английском языке.
Давайте снова посмотрим на наши примеры данных. Теперь мы
хотим напечатать всех студентов, которые набрали от 50 до 80 баллов.
Мы используем Аnd, чтобы добавить дополнительное условие. Код гласит: если оценка больше или равна 50 и меньше 75, напечатайте имя студента.
Sub ProverkaStrokiOcenok() Dim i As Long, marks As Long For i = 2 To 11 ' Хранить оценки для текущего студента marks = Sheet1.Range("C" & i).Value ' Проверьте, если отметки больше 50 и меньше 75 If marks >= 50 And marks < 80 Then ' Напечатайте имя и фамилию в Immediate window (Ctrl+G) Debug.Print Sheet1.Range("A" & i).Value & Sheet1.Range("B" & i).Value End If Next End Sub
Вывести имя и фамилию в результаты:
- Дмитрий Маренин
- Олеся Клюева
- Евгений Яшин
В нашем следующем примере мы хотим знать, кто из студентов сдавал историю или геометрию. Таким образом, в данном случае мы говорим, изучал ли студент «История» ИЛИ изучал ли он «Геометрия» (Ctrl+G).
Sub ChitatObektOcenki() Dim i As Long, marks As Long ' Пройдите столбцы отметок For i = 2 To 11 marks = Sheet1.Range("D" & i).Value ' Проверьте, если отметки больше 50 и меньше 80 If marks = "История" Or marks = "Геометрия" Then ' Напечатайте имя и фамилию в Immediate window (Ctrl+G) Debug.Print Sheet1.Range("A" & i).Value & " " & Sheet1.Range("B" & i).Value End If Next End Sub
Результаты:
- Василий Кочин
- Александр Грохотов
- Дмитрий Маренин
- Николай Куликов
- Олеся Клюева
- Наталия Теплых
- Дмитрий Андреев
Использование нескольких таких условий часто является
источником ошибок. Эмпирическое правило, которое нужно помнить, должно быть
максимально простым.
Использование IF AND
And работает следующим образом:
Условие 1 | Условие 2 | Результат |
ИСТИНА | ИСТИНА | ИСТИНА |
ИСТИНА | ЛОЖЬ | ЛОЖЬ |
ЛОЖЬ | ИСТИНА | ЛОЖЬ |
ЛОЖЬ | ЛОЖЬ | ЛОЖЬ |
Что вы заметите, так это то, что And верно только тогда, когда все условия выполняются.
Использование IF OR
Ключевое слово OR работает следующим образом
Условие 1 | Условие 2 | Результат |
ИСТИНА | ИСТИНА | ИСТИНА |
ИСТИНА | ЛОЖЬ | ИСТИНА |
ЛОЖЬ | ИСТИНА | ИСТИНА |
ЛОЖЬ | ЛОЖЬ | ЛОЖЬ |
Что вы заметите, так это то, что OR ложно, только когда все условия ложны.
Смешивание And и Or может затруднить чтение кода и привести к ошибкам. Использование скобок может сделать условия более понятными.
Sub OrSAnd() Dim subject As String, marks As Long subject = "История" marks = 5 If (subject = "Геометрия" Or subject = "История") And marks >= 6 Then Debug.Print "ИСТИНА" Else Debug.Print "ЛОЖЬ" End If End Sub
Использование IF NOT
Также есть оператор NOT. Он возвращает противоположный результат условия.
Условие | Результат |
ИСТИНА | ЛОЖЬ |
ЛОЖЬ | ИСТИНА |
Следующие две строки кода эквивалентны.
If marks < 40 Then If Not marks >= 40 Then
так же, как и
If True Then If Not False Then
и
If False Then If Not True Then
Помещение условия в круглые скобки облегчает чтение кода
If Not (marks >= 40) Then
Распространенное использование Not — при проверке, был ли установлен объект. Возьмите Worksheet для примера. Здесь мы объявляем рабочий лист.
Dim mySheet As Worksheet ' Некоторый код здесь
Мы хотим проверить действительность mySheet перед его использованием. Мы можем проверить, если это Nothing.
If mySheet Is Nothing Then
Нет способа проверить, является ли это чем-то, поскольку есть много разных способов, которым это может быть что-то. Поэтому мы используем NOT с Nothing.
If Not mySheet Is Nothing Then
Если вы находите это немного запутанным, вы можете использовать круглые скобки, как здесь
If Not (mySheet Is Nothing) Then
Функция IIF
VBA имеет функцию, аналогичную функции Excel If. В Excel вы часто используете функцию If следующим образом:
= ЕСЛИ (F2 =»»,»», F1 / F2)
Формат
= If (условие, действие, если ИСТИНА, действие, если ЛОЖЬ).
VBA имеет функцию IIf, которая работает так же. Давайте посмотрим на примере. В следующем коде мы используем IIf для проверки значения переменной val. Если значение больше 10, мы печатаем ИСТИНА, в противном случае мы печатаем ЛОЖЬ.
Sub ProveritVal() Dim result As Boolean Dim val As Long ' Печатает ИСТИНА val = 11 result = IIf(val > 10, ИСТИНА, ЛОЖЬ) Debug.Print result ' печатает ЛОЖЬ val = 5 result = IIf(val > 10, ИСТИНА, ЛОЖЬ) Debug.Print result End Sub
В нашем следующем примере мы хотим распечатать «Удовлетворитеьно» или «Незачет» рядом с каждым студентом в зависимости от их баллов. В первом фрагменте кода мы будем использовать обычный оператор VBA If, чтобы сделать это.
Sub ProveritDiapazonOcenok() Dim i As Long, marks As Long For i = 2 To 11 ' Хранить оценки для текущего студента marks = Sheet1.Range("C" & i).Value ' Проверьте, прошел ли студент или нет If marks >= 40 Then ' Запишите имена для столбца F Sheet1.Range("E" & i) = "Удовлетворительно" Else Sheet1.Range("E" & i) = "Незачет" End If Next End Sub
В следующем фрагменте кода мы будем использовать функцию IIf. Код здесь намного аккуратнее.
Sub ProveritDiapazonOcenok () Dim i As Long, marks As Long For i = 2 To 11 ' Хранить оценки для текущего студента marks = Sheet1.Range("C" & i) ' Проверьте, прошел ли студент или нет Sheet1.Range("E" & i).Value = IIf(marks >= 40,"Удовлетворительно","Незачет") Next End Sub
Функция IIf очень полезна для простых случаев, когда вы имеете дело с двумя возможными вариантами.
Использование Nested IIf
Вы также можете вкладывать IIf-операторы, как в Excel. Это означает использование результата одного IIf с другим. Давайте добавим еще один тип результата в наши предыдущие примеры. Теперь мы хотим напечатать «Отлично», «Удовлетворительно» или «Незачетт» для каждого студента.
Используя обычный VBA, мы сделали бы это так
Sub ProveritRezultatiTip2() Dim i As Long, marks As Long For i = 2 To 11 ' Хранить оценки для текущего студента marks = Sheet1.Range("C" & i).Value If marks >= 75 Then Sheet1.Range("E" & i).Value = "Отлично" ElseIf marks >= 40 Then ' Запишите имена для столбца F Sheet1.Range("E" & i).Value = "Удовлетворительно" Else Sheet1.Range("E" & i).Value = "Незачет" End If Next End Sub
Используя вложенные IIfs, мы могли бы сделать это так
Sub IspNestedIIF() Dim i As Long, marks As Long, result As String For i = 2 To 11 marks = Sheet1.Range("C" & i).Value result = IIf(marks >= 55,"Хорошо",IIf(marks >= 40,"Удовлетворительно","Незачет")) Sheet1.Range("E" & i).Value = result Next End Sub
Использование вложенного IIf хорошо в простых случаях, подобных этому. Код прост для чтения и, следовательно, вряд ли вызовет ошибки.
Чего нужно остерегаться
Важно понимать, что функция IIf всегда оценивает как
Истинную, так и Ложную части выражения независимо от условия.
В следующем примере мы хотим разделить по баллам, когда он не равен нулю. Если он равен нулю, мы хотим вернуть ноль.
marks = 0 total = IIf(marks = 0, 0, 60 / marks)
Однако, когда отметки равны нулю, код выдаст ошибку «Делить на ноль». Это потому, что он оценивает как Истинные, так и Ложные утверждения. Здесь ложное утверждение, т.е. (60 / Marks), оценивается как ошибка, потому что отметки равны нулю.
Если мы используем нормальный оператор IF, он будет
запускать только соответствующую строку.
marks = 0 If marks = 0 Then 'Выполняет эту строку только когда отметки равны нулю total = 0 Else 'Выполняет только эту строку, когда отметки не равны нулю total = 60 / marks End If
Это также означает, что если у вас есть функции для ИСТИНА и ЛОЖЬ, то обе будут выполнены. Таким образом, IIF будет запускать обе функции, даже если он использует только одно возвращаемое значение. Например:
' Обе функции будут выполняться каждый раз total = IIf(marks = 0, Func1, Func2)
IF против IIf
Так что лучше?
В этом случае вы можете видеть, что IIf короче для написания и аккуратнее. Однако если условия усложняются, вам лучше использовать обычное выражение If. Недостатком IIf является то, что он недостаточно известен, поэтому другие пользователи могут не понимать его так же, как и код, написанный с помощью обычного оператора if.
Кроме того, как мы обсуждали в последнем разделе, IIF всегда оценивает части ИСТИНА и ЛОЖЬ, поэтому, если вы имеете дело с большим количеством данных, оператор IF будет быстрее.
Мое эмпирическое правило заключается в том, чтобы
использовать IIf, когда
он будет прост для чтения и не требует вызовов функций. Для более сложных
случаев используйте обычный оператор If.
Использование Select Case
Оператор Select Case
— это альтернативный способ написания статистики If с большим количеством ElseIf. Этот тип операторов
вы найдете в большинстве популярных языков программирования, где он называется
оператором Switch. Например,
Java, C #, C ++ и Javascript
имеют оператор switch.
Формат
Select Case [переменная] Case [условие 1] Case [условие 2] Case [условие n] Case Else End Select
Давайте возьмем наш пример DobClass сверху и перепишем его с помощью оператора Select Case.
Sub DobavitClass() ' получить последнюю строку Dim startRow As Long, lastRow As Long startRow = 2 lastRow = Sheet1.Cells(Sheet1.Rows.Count, 1).End(xlUp).Row Dim i As Long, Marks As Long Dim sClass As String ' Пройдите столбцы отметок For i = startRow To lastRow Marks = Sheet1.Range("C" & i).Value ' Проверьте отметки и классифицируйте соответственно If Marks >= 85 Then sClass = "Высший балл" ElseIf Marks >= 75 Then sClass = "Отлично" ElseIf Marks >= 55 Then sClass = "Хорошо" ElseIf Marks >= 40 Then sClass = "Удовлетворительно" Else ' Для всех других оценок sClass = "Незачет" End If ' Запишите класс в столбец E Sheet1.Range("E" & i).Value = sClass Next End Sub
Ниже приведен тот же код с использованием оператора Select Case. Главное, что вы заметите, это то, что мы используем “Case 85 to 100” rather than “marks >=85 And marks <=100”. , а не “marks >=85 And marks <=100”.
Sub DobavitClassSSelect() ' получить первую и последнюю строки Dim firstRow As Long, lastRow As Long firstRow = 2 lastRow = Cells(Cells.Rows.Count, 1).End(xlUp).Row Dim i As Long, marks As Long Dim sClass As String ' Пройдите столбцы отметок For i = firstRow To lastRow marks = Sheet1.Range("C" & i).Value ' Проверьте отметки и классифицируйте соответственно Select Case marks Case 85 To 100 sClass = "Высший балл" Case 75 To 84 sClass = "Отлично" Case 55 To 74 sClass = "Хорошо" Case 40 To 54 sClass = "Удовлетворительно" Case Else ' Для всех других оценок sClass = "Незачет" End Select ' Запишите класс в столбец E Sheet1.Range("E" & i).Value = sClass Next End Sub
Использование Case Is
Вы можете переписать оператор select в том же формате, что и оригинальный ElseIf. Вы можете использовать Is с Case.
Select Case marks Case Is >= 85 sClass = "Высший балл" Case Is >= 75 sClass = "Отлично" Case Is >= 55 sClass = "Хорошо" Case Is >= 40 sClass = "Удовлетворительно" Case Else ' Для всех других оценок sClass = "Незачет" End Select
Вы можете использовать Is для проверки нескольких значений.
В следующем коде мы проверяем, равны ли оценки 5, 7 или 9.
Sub TestNeskZnach() Dim marks As Long marks = 7 Select Case marks Case Is = 5, 7, 9 Debug.Print True Case Else Debug.Print False End Select End Sub
Попробуйте это упражнение
В этой статье много рассказывали о выражении If. Хороший способ помочь вам понять — это попытаться написать код, используя темы, которые мы рассмотрели. В следующем упражнении используются тестовые данные из этой статьи. Ответ на упражнение ниже.
Мы будем использовать ячейку G1, чтобы написать имя
субъекта.
В колонках от H до L запишите всех студентов, которые имеют оценки по этому предмету. Мы хотим классифицировать их результат как успешный или неудачный. Оценка ниже 40 — неудача, оценка 40 или выше — Зачет.
Колонка H: Имя
Колонка I: Фамилия
Колонка J: Баллы
Колонка H: Предмет
Столбец I: Тип результата — Зачет или Незачет
Если ячейка G1 содержит «Геометрия», то ваш результат должен выглядеть следующим образом:
Ответ на упражнение
Следующий код показывает, как выполнить вышеупомянутое упражнение.
Примечание: есть много способов выполнить задачу, поэтому не расстраивайтесь, если ваш код отличается.
Sub ZapisatRezultat() ' Получить тему Dim subject As String subject = Sheet1.Range("G1").Value If subject = "" Then Exit Sub End If ' Получить первый и последний ряд Dim firstRow As Long, lastRow As Long firstRow = 2 lastRow = Cells(Cells.Rows.Count, 1).End(xlUp).Row ' Очистить любой существующий вывод Sheet1.Range("H:L").ClearContents ' Отслеживать выходной ряд Dim outRow As Long outRow = 1 Dim i As Long, marks As Long, rowSubject As String ' Прочитать данные For i = firstRow To lastRow marks = Sheet1.Range("C" & i).Value rowSubject = Sheet1.Range("D" & i).Value If rowSubject = subject Then ' Запишите данные студента, если предмет Геометрия Sheet1.Range("A" & i & ":" & "D" & i).Copy Sheet1.Range("H" & outRow).PasteSpecial xlPasteValues ' Запишите Зачет или Незачет If marks < 40 Then Sheet1.Range("L" & outRow).Value = "Незачет" ElseIf marks >= 40 Then Sheet1.Range("L" & outRow).Value = "Зачет" End If ' Переместить вывод в следующую строку outRow = outRow + 1 End If Next i End Sub
Home / VBA / Top VBA Functions / VBA ISERROR Function (Syntax + Example)
The VBA ISERROR function is listed under the information category of VBA functions. When you use it in a VBA code, it evaluates the supplied expression and returns TRUE if it is an error or else FALSE. In simple words, it can check whether the value supplied is an error or not and returns TRUE or FALSE based on that. It’s equivalent to the worksheet’s ISERROR function.
IsError(Expression)
Arguments
- Expression: An expression that you want to test if it’s an error or not.
Example
To practically understand how to use the VBA ISERROR function, you need to go through the below example where we have written a vba code by using it:
Sub example_ISERROR()
Range("B1").Value = IsError(Range("A1"))
End Sub
In the above code, we have used ISERROR to check if cell A1 has an error or not, as a result, it has returned TRUE as we have an #N/A error in cell A1.
Excel VBA ISERROR Function
VBA IsError, the function name itself, sums up the functionality. This function will identify whether or not the value we have supplied is an error value. If the supplied or range reference value is an error value, we will get the result as “TRUE.” If the value is not an error, we will get the result as “FALSE.”
Table of contents
- Excel VBA ISERROR Function
- Examples
- Example #1
- Example #2
- Things to Remember
- Recommended Articles
- Examples
Syntax
The expression is nothing but the value we are testing or the cell reference value or formula expression. And as you can see, the result will be “Boolean.”
Examples
You can download this VBA ISERROR Excel Template here – VBA ISERROR Excel Template
Example #1
We will see a simple example to find whether the value is an error. For example, we have the below value in cell A1.
We will test whether this value is an error value or not.
- Start the macro code.
Code:
Sub IsError_Example1() End Sub
- Declare a variable to store the cell A1 value.
Code:
Sub IsError_Example1() Dim ExpValue As Variant End Sub
- Now, assign the value of cell A1 to this variable in VBA.
Code:
Sub IsError_Example1() Dim ExpValue As Variant ExpValue = Range("A1").Value End Sub
- Now, test whether this variable value is an error or not.
Code:
Sub IsError_Example1() Dim ExpValue As Variant ExpValue = Range("A1").Value IsError (ExpValue) End Sub
- Enclose this result in a message box in VBA.
Code:
Sub IsError_Example1() Dim ExpValue As Variant ExpValue = Range("A1").Value MsgBox IsError(ExpValue) End Sub
Let us run the code and see the result of the ISERROR function.
The result is TRUE because the value in cell A1 is #DIV/0! which is the division error.
Now, we will change the value of cell A1 to “Hello.”
Now run the code and see the result.
So, the result is FALSE now because the value in cell A1 is not the error value.
So, first, we need to understand the error types and why they occur in the Excel worksheet. Below are the detailed error values and explanations.
- #DIV/0: This error occurs when we try to divide the number by zero. This error is called “Division by Zero.”
- #N/A: When you try to fetch the data from different tables, and if it finds no value, then we will get this error, which is called “Not Available.”
- #NAME?: If Excel cannot recognize the formula or name, we will get this error.
- #NULL!: When you specify space between the cell referencesCell reference in excel is referring the other cells to a cell to use its values or properties. For instance, if we have data in cell A2 and want to use that in cell A1, use =A2 in cell A1, and this will copy the A2 value in A1.read more instead of a comma.
- #NUM!: The numerical value supplied to the data isn’t a valid one.
- #VALUE!: When you reference the cell values for mathematical calculations, and if the number format is not correct, we will get this error.
- #REF!: If the cell is a formula, it has cell references. If that referenced cell deletes, then we will get this reference error.
Example #2
Now, look at the below data set.
We need to identify the error values from this list and store the result, either TRUE or FALSE, in the next column.
Since we need to test more than one cell, we need to include this in loops. The below code will identify the error values.
Code:
Sub IsError_Example2() Dim k As Integer For k = 2 To 12 Cells(k, 4).Value = IsError(Cells(k, 3).Value) Next k End Sub
When you run this code, we will get the below result in column 4.
Wherever TRUE is, that value is an error value.
Things to Remember
- The ISERROR function returns the Boolean type result, i.e., TRUE or FALSE.
- It is available as a worksheet function as well as a VBA functionVBA functions serve the primary purpose to carry out specific calculations and to return a value. Therefore, in VBA, we use syntax to specify the parameters and data type while defining the function. Such functions are called user-defined functions.read more.
- It is useful as part of large VBA projects.
- It recognizes only pre-determined error values (Read error type).
Recommended Articles
This article has been a guide to VBA ISERROR. Here, we discuss how the Excel VBA ISERROR function identifies whether the value we have supplied is an error value or not with examples. You can learn more about VBA functions from the following articles: –
- VBA IsDate Function
- IFERROR in VBA
- VBA On Error GoTo
- VBA 1004 Error Example
- VBA Double