Vba excel операторы сравнения

Операторы сравнения чисел и строк, ссылок на объекты (Is) и строк по шаблону (Like), использующиеся в VBA Excel. Их особенности, примеры вычислений.

Операторы сравнения чисел и строк

Операторы сравнения чисел и строк представлены операторами, состоящими из одного или двух математических знаков равенства и неравенства:

  • <   – меньше;
  • <= – меньше или равно;
  • >   – больше;
  • >= – больше или равно;
  • =   – равно;
  • <> – не равно.

Синтаксис:

Результат = Выражение1 Оператор Выражение2
  • Результат – любая числовая переменная;
  • Выражение – выражение, возвращающее число или строку;
  • Оператор – любой оператор сравнения чисел и строк.

Если переменная Результат будет объявлена как Boolean (или Variant), она будет возвращать значения False и True. Числовые переменные других типов будут возвращать значения 0 (False) и -1 (True).

Операторы сравнения чисел и строк работают с двумя числами или двумя строками. При сравнении числа со строкой или строки с числом, VBA Excel сгенерирует ошибку Type Mismatch (несоответствие типов данных):

Sub Primer1()

On Error GoTo Instr

Dim myRes As Boolean

‘Сравниваем строку с числом

  myRes = «пять» > 3

Instr:

If Err.Description <> «» Then

  MsgBox «Произошла ошибка: « & Err.Description

End If

End Sub

Сравнение строк начинается с их первых символов. Если они оказываются равны, сравниваются следующие символы. И так до тех пор, пока символы не окажутся разными или одна или обе строки не закончатся.

Значения буквенных символов увеличиваются в алфавитном порядке, причем сначала идут все заглавные (прописные) буквы, затем строчные. Если необходимо сравнить длины строк, используйте функцию Len.

myRes = «семь» > «восемь» ‘myRes = True

myRes = «Семь» > «восемь» ‘myRes = False

myRes = Len(«семь») > Len(«восемь») ‘myRes = False

Оператор Is – сравнение ссылок на объекты

Оператор Is предназначен для сравнения двух переменных со ссылками на объекты.

Синтаксис:

Результат = Объект1 Is Объект2
  • Результат – любая числовая переменная;
  • Объект – переменная со ссылкой на любой объект.

Если обе переменные Объект1 и Объект2 ссылаются на один и тот же объект, Результат примет значение True. В противном случае результатом будет False.

Set myObj1 = ThisWorkbook

Set myObj2 = Sheets(1)

Set myObj3 = myObj1

Set myObj4 = Sheets(1)

myRes = myObj1 Is myObj2 ‘myRes = False

myRes = myObj1 Is myObj3 ‘myRes = True

myRes = myObj2 Is myObj4 ‘myRes = True

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

Set myObj1 = Range(«A1:D4»)

Set myObj2 = Range(«A1:D4»)

Set myObj3 = myObj1

myRes = myObj1 Is myObj2 ‘myRes = False

myRes = myObj1 Is myObj3 ‘myRes = True

Оператор Like – сравнение строк по шаблону

Оператор Like предназначен для сравнения одной строки с другой по шаблону.

Синтаксис:

Результат = Выражение Like Шаблон
  • Результат – любая числовая переменная;
  • Выражение – любое выражение, возвращающее строку;
  • Шаблон – любое строковое выражение, которое может содержать знаки подстановки.

Строка, возвращенная аргументом Выражение, сравнивается со строкой, возвращенной аргументом Шаблон. Если обе строки совпадают, переменной Результат присваивается значение True, иначе – False.

myRes = «восемь» Like «семь»  ‘myRes = False

myRes = «восемь» Like «*семь»  ‘myRes = True

myRes = «Куда идет король» Like «идет»  ‘myRes = False

myRes = «Куда идет король» Like «*идет*»  ‘myRes = True

Со знаками подстановки для оператора Like вы можете ознакомиться в статье Знаки подстановки для шаблонов.

Источник

VBA in Excel stands for Visual Basic for Applications which is Microsoft’s programming language. To optimize the performance and reduce the time in Excel we need Macros and VBA is the tool used in the backend.

Some helpful links to get more insights about Macros, VBA in Excel :

1. Record Macros in Excel.

2. How to Create a Macro in Excel?

In this article, we are going to discuss various comparison operators in Excel VBA.

Implementation :

In the Microsoft Excel tabs, select the Developer Tab. Initially, the Developer Tab may not be available. 

The Developer Tab can be enabled easily by a two-step process :

  • Right-click on any of the existing tabs in the top of the Excel window.
  • Now select Customize the Ribbon from the pop-down menu.

  • The Excel Options Box, check the box Developer to enable it and click on OK.

  • Now, the Developer Tab is visible.

  • Now click on the Visual Basic option in the Developer tab and make a new module to write the program.
Developer  -> Visual Basic -> Tools -> Macros

Now create a Macro and give any suitable name.

This will open the Editor window where can write the code.

Comparison Operators in Excel:

S.No. Operators

Definition
1 <>

 Not equal operator is used to compare two operands. If the two operands

are not equal it returns TRUE else it returns FALSE.

For example : A=10, B= 20

The condition will be TRUE for A <> B, since A and B are not equal.
2 =

 Equal operator is used to compare two operands. If the two operands

are equal it returns TRUE else it returns FALSE.

For example : A=20, B= 20

The condition will be TRUE for A = B, since A and B are equal.
3 >

Greater than operator checks whether the operand on the left hand side is strictly 

greater than the operand on RHS. If greater then it returns TRUE else FALSE.

For example : A=10, B= 5

The condition will be TRUE for A > B, since A is greater than B.
4 <

Less than operator checks whether the operand on the left hand side is strictly

less than the operand on RHS. If greater then it returns TRUE else FALSE.

For example : A=10, B= 5

The condition will be FALSE for A < B, since A is greater than B.
5 >=

Greater than equal to operator checks whether the operand on the left hand side is either

greater or equal to the operand on RHS. If greater or equal then it returns TRUE else FALSE.

For example : A=10, B=10

The condition will be TRUE for A >= B, since A is equal to B.
6 <=

Less than equal to operator checks whether the operand on the left hand side is either

lesser or equal to the operand on RHS. If lesser or equal then it returns TRUE else FALSE.

For example : A=5, B=10

The condition will be TRUE for A <= B, since A is less than B.

The comparison operators are mostly used with the If Else Then statement in Excel because comparison operators return TRUE if the condition is met and FALSE if not. 

The syntax of If Else in Excel is :

If condition/expression Then
    Code Block for True
Else
    Code Block for False
End If

Let’s take an example where values of A=-1 and B=-5 and see the code in Excel VBA for all the comparison operators.

1. Equal To and Not Equal To

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Equal To
If A = B Then
    MsgBox " A and B are equal"
Else
    MsgBox " A and B are not equal"
End If
End Sub

In the above code, If the condition becomes FALSE since A and B values are not the same. So the code block inside Else will be executed.

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Not Equal To
If A <> B Then
    MsgBox " True since A and B are not same"
Else
    MsgBox " False since A and B are same"
End If
End Sub

In the above code If the condition becomes TRUE since A and B are not same. So the code block inside If will be executed.

2. Greater than or Less than operator :

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Greater Than
If A > B Then
    MsgBox " A is greater than B"
Else
    MsgBox " A is not greater than B"
End If
End Sub

In the above code If the condition becomes TRUE since A is greater than B. So the code block inside If will be executed.

Sub Comparison_Operator_Demo()
'Entering the numbers
Dim A As Integer: A = -1
Dim B As Integer: B = -5
'Condition for Less Than
If A < B Then
    MsgBox "True because A is less than B"
Else
    MsgBox "False because A is greater than B"
End If
End Sub

In the above code If the condition becomes FALSE since A is greater than B. So the code block inside Else will be executed.

Similarly, you can do for Greater than equal to and Less than equal to operators.

Источник

Операторы сравнения VBA

Это операторы, которые используются для сравнения значений. Операторы сравнения включают равно, меньше, больше, чем и не равно

В следующей таблице приведены операторы сравнения VBA.

Операторы сравнения используются для сравнения значений в целях проверки. Допустим, вы разрабатываете простое приложение для точек продаж. В этом приложении вы хотите проверить значения, введенные перед публикацией. В таких случаях вы можете использовать операторы сравнения. Этот оператор проверит отрицательные числа или удостоверится, что оплаченная сумма не превышает сумму счета. Операторы сравнения пригодятся в таких ситуациях.

S / N оператор Описание пример Вывод
1 знак равно Равно: проверяет, равны ли два значения. Он также используется в качестве оператора присваивания Если x = z, то Возвращает true, если они равны, иначе возвращает false
2 < Менее чем: этот оператор используется для вычитания чисел Если x <z, то Возвращает true, если x меньше z, иначе возвращает false
3 > Больше чем: этот оператор используется для умножения чисел Если x> z, то Возвращает true, если x больше z, иначе возвращает false
4 <> Не равно: этот оператор используется для деления чисел Если x <> z, то Возвращает true, если они не равны, иначе возвращает false
5 <= Меньше или равно: Если x <= z, то Возвращает true, если x меньше или равен z, иначе возвращает false
6 > = Больше или равно: Если х> = Тогда Возвращает true, если x больше z, иначе возвращает false

Пример исходного кода

Оператор равного сравнения 

    If 2 = 1 Then
            MsgBox "True", vbOKOnly, "Equal Operator"
        Else
            MsgBox "False", vbOKOnly, "Equal Operator"
    End If

ВОТ,

  • «If 2 = 1 Then… Else… End If» использует оператор if для оценки условия «2 = 1»
  • «MsgBox…» – это встроенная функция, которая отображает окно сообщения.
    • Первый параметр «True» или «False» – это то, что будет отображаться в окне сообщения. В нашем примере 2 не равно 1, поэтому в поле сообщения отображается «ложь».
    • Второй параметр «vbOKOnly» – это кнопка, которая отображается в окне сообщения
    • Третий параметр «Оператор равенства» – это заголовок окна сообщения.

Выполнение приведенного выше кода дает следующие результаты

Операторы VBA

Загрузите приведенный выше код Excel

Источник

These are operators that are used to compare values. Comparison operators include equal to, less than, greater than and not equal to

Comparison operators are used to compare values for validation purposes. Let’s say you are developing a simple point of sale application. In this application, you want to validate the values entered before you post. In such cases, you can use comparison operators. This operator will check against the negative numbers or to ensure that the amount paid does not exceed the billed amount. Comparison operators come in handy in such situations.

The following table lists the comparison operators defined in VBA.

Operator Description
= Equal: checks if two values are equal. It is also used as an assignment operator
< Less than: This operator is used to subtract numbers
> Greater than: This operator is used to multiply numbers
<> Not equal to: This operator is used to divide numbers
<= Less than or equal to:
>= Greater than or equal to:

VBA Comparison Operators with Example

The following table shows Excel VBA Comparison Operators with examples and output.

S/N Operator Example Output
1 = If x = z Then Returns true if they are equal, else it returns false
2 < If x < z Then Returns true if x is less than z, else it returns false
3 > If x > z Then Returns true if x is greater than z, else it returns false
4 <> If x <> z Then Returns true if they are not equal, else it returns false
5 <= If x <= z Then Returns true if x is less than or equal to z, else it returns false
6 >= If x >= Then Returns true if x is greater than or equal to z, else it returns false

Example source code

Equal Comparison Operator

    If 2 = 1 Then
            MsgBox "True", vbOKOnly, "Equal Operator"
        Else
            MsgBox "False", vbOKOnly, "Equal Operator"
    End If

HERE,

  • “If 2 = 1 Then… Else… End If” uses the if statement to evaluate the condition “2 = 1”
  • “MsgBox…” Is a built-in function that displays a message box.
    • The first parameter “True” or “False” is what will be displayed in the message box. In our example, 2 is not equal to 1, therefore, it will show “false” in the msg box.
    • The second parameter “vbOKOnly” is the button that is displayed in the message box
    • The third parameter “Equal Operator” is the title of the message box.

Executing the above code gives the following results

VBA Operators

Download the above Excel Code

Источник

На чтение 6 мин Опубликовано 15.12.2015

Содержание

  1. Операторы Excel VBA
  2. Математические операторы
  3. Строковые операторы
  4. Операторы сравнения
  5. Логические операторы
  6. Встроенные функции

Операторы Excel VBA

При написании кода VBA в Excel набор встроенных операторов используют на каждом шагу. Эти операторы делятся на математические, строковые, операторы сравнения и логические. Далее мы подробно рассмотрим каждую группу операторов.

Математические операторы

Основные математические операторы VBA перечислены в таблице ниже.

В правом столбце таблицы указан приоритет операторов, принятый по умолчанию при отсутствии скобок. Добавляя в выражение скобки, можно изменять порядок выполнения операторов VBA по своему желанию.

Оператор Действие Приоритет
(1 — высший; 5 — низший)
^ Оператор возведения в степень 1
* Оператор умножения 2
/ Оператор деления 2
Оператор деления без остатка – возвращает результат деления двух чисел без остатка. Например, 74 возвратит результат 1 3
Mod Оператор модуля (остатка) – возвращает остаток от деления двух чисел. Например, 8 Mod 3 возвратит результат 2. 4
+ Оператор сложения 5
— Оператор вычитания 5

Строковые операторы

Основной строковый оператор в Excel VBA – это оператор конкатенации & (слияние):

Оператор Действие
& Оператор конкатенации. К примеру, выражение «A» & «B» возвратит результат AB.

Операторы сравнения

Операторы сравнения используются для сравнения двух чисел или строк и возвращают логическое значение типа Boolean (True или False). Основные операторы сравнения Excel VBA перечислены в этой таблице:

Оператор Действие
= Равно
<> Не равно
< Меньше
> Больше
<= Меньше либо равно
>= Больше либо равно

Логические операторы

Логические операторы, как и операторы сравнения, возвращают логическое значение типа Boolean (True или False). Основные логические операторы Excel VBA перечислены в таблице ниже:

Оператор Действие
And Операция конъюнкции, логический оператор И. Например, выражение A And B возвратит True, если A и B оба равны True, в противном случае возвратит False.
Or Операция дизъюнкции, логический оператор ИЛИ. Например, выражение A Or B возвратит True, если A или B равны True, и возвратит False, если A и B оба равны False.
Not Операция отрицания, логический оператор НЕ. Например, выражение Not A возвратит True, если A равно False, или возвратит False, если A равно True.

В приведённой выше таблице перечислены не все логические операторы, доступные в VBA. Полный список логических операторов можно найти на сайте Visual Basic Developer Center.

Встроенные функции

В VBA доступно множество встроенных функций, которые могут быть использованы при написании кода. Ниже перечислены некоторые из наиболее часто используемых:

Функция Действие
Abs Возвращает абсолютную величину заданного числа.

Пример:

  • Abs(-20) возвращает значение 20;
  • Abs(20) возвращает значение 20.
Chr Возвращает символ ANSI, соответствующий числовому значению параметра.

Пример:

  • Chr(10) возвращает перенос строки;
  • Chr(97) возвращает символ a.
Date Возвращает текущую системную дату.
DateAdd Добавляет определённый временной интервал к заданной дате. Синтаксис функции:

DateAdd(интервал, число, дата)

Где аргумент интервал определяет тип временного интервала, добавляемого к заданной дате в количестве, указанном в аргументе число.

Аргумент интервал может принимать одно из следующих значений:

Интервал Значение
yyyy год
q квартал
m месяц
y день года
d день
w день недели
ww неделя
h час
n минута
s секунда

Пример:

  • DateAdd(«d», 32, «01/01/2015») добавляет 32 дня к дате 01/01/2015 и, таким образом, возвращает дату 02/02/2015.
  • DateAdd(«ww», 36, «01/01/2015») добавляет 36 недель к дате 01/01/2015 и возвращает дату 09/09/2015.
DateDiff Вычисляет количество определённых временных интервалов между двумя заданными датами.

Пример:

  • DateDiff(«d», «01/01/2015», «02/02/2015») вычисляет количество дней между датами 01/01/2015 и 02/02/2015, возвращает результат 32.
  • DateDiff(«ww», «01/01/2015», «03/03/2016») вычисляет количество недель между датами 01/01/2015 и 03/03/2016, возвращает результат 61.
Day Возвращает целое число, соответствующее дню месяца в заданной дате.

Пример: Day(«29/01/2015») возвращает число 29.
Hour Возвращает целое число, соответствующее количеству часов в заданном времени.

Пример: Hour(«22:45:00») возвращает число 22.
InStr Принимает в качестве аргументов целое число и две строки. Возвращает позицию вхождения второй строки внутри первой, начиная поиск с позиции, заданной целым числом.

Пример:

  • InStr(1, «Вот искомое слово», «слово») возвращает число 13.
  • InStr(14, «Вот искомое слово, а вот еще искомое слово», «слово») возвращает число 38.

Примечание: Аргумент-число может быть не задан, в таком случае поиск начинается с первого символа строки, заданной во втором аргументе функции.
Int Возвращает целую часть заданного числа.

Пример: Int(5.79) возвращает результат 5.
Isdate Возвращает True, если заданное значение является датой, или False – если датой не является.

Пример:

  • IsDate(«01/01/2015») возвращает True;
  • IsDate(100) возвращает False.
IsError Возвращает True, если заданное значение является ошибкой, или False – если ошибкой не является.
IsMissing В качестве аргумента функции передаётся имя необязательного аргумента процедуры. IsMissing возвращает True, если для рассматриваемого аргумента процедуры не передано значение.
IsNumeric Возвращает True, если заданное значение может быть рассмотрено как число, в противном случае возвращает False.
Left Возвращает заданное количество символов от начала переданной строки. Синтаксис функции вот такой:

Left(строка, длина)

где строка – это исходная строка, а длина – количество возвращаемых символов, считая от начала строки.

Пример:

  • Left(«абвгдежзиклмн», 4) возвращает строку «абвг»;
  • Left(«абвгдежзиклмн», 1) возвращает строку «а».
Len Возвращает количество символов в строке.

Пример: Len(«абвгдеж») возвращает число 7.
Month Возвращает целое число, соответствующее месяцу в заданной дате.

Пример: Month(«29/01/2015») возвращает значение 1.
Mid Возвращает заданное количество символов из середины переданной строки. Синтаксис функции:

Mid(строка, начало, длина)

где строка – это исходная строка, начало – позиция начала извлекаемой строки, длина – количество символов, которые требуется извлечь.

Пример:

  • Mid(«абвгдежзиклмн», 4, 5) возвращает строку «гдежз»;
  • Mid(«абвгдежзиклмн», 10, 2) возвращает строку «кл».
Minute Возвращает целое число, соответствующее количеству минут в заданном времени.Пример: Minute(«22:45:15») возвращает значение 45.
Now Возвращает текущую системную дату и время.
Right Возвращает заданное количество символов от конца переданной строки. Синтаксис функции:

Right(строка, длина)

Где строка – это исходная строка, а длина – это количество символов, которые надо извлечь, считая от конца заданной строки.

Пример:

  • Right(«абвгдежзиклмн», 4) возвращает строку «клмн»;
  • Right(«абвгдежзиклмн», 1) возвращает строку «н».
Second Возвращает целое число, соответствующее количеству секунд в заданном времени.

Пример: Second(«22:45:15») возвращает значение 15.
Sqr Возвращает квадратный корень числовой величины, переданной в аргументе.

Пример:

  • Sqr(4) возвращает значение 2;
  • Sqr(16) возвращает значение 4.
Time Возвращает текущее системное время.
Ubound Возвращает верхний индекс измерения заданного массива.

Примечание: Для многомерных массивов в качестве необязательного аргумента может быть указано, индекс какого именно измерения нужо возвратить. Если не указано, то по умолчанию равно 1.
Year Возвращает целое число, соответствующее году в заданной дате.Пример: Year(«29/01/2015») возвращает значение 2015.

Данный список включает в себя только избранные наиболее часто употребляемые встроенные функции Excel Visual Basic. Исчерпывающий список функций VBA, доступных для использования в макросах Excel, можно найти на сайте Visual Basic Developer Center.

Оцените качество статьи. Нам важно ваше мнение:

Источник

Содержание

  • Список основных операторов сравнения в VBA
  • Равно
  • Не равно
  • Больше чем
  • Больше или равно
  • Меньше, чем
  • Меньше или равно
  • Оператор
  • Оператор Like

VBA позволяет использовать операторы сравнения для сравнения значений. Используя эти операторы, вы можете сравнивать значения и в результате возвращать логическое значение True или False.

Сначала мы отобразим список операторов сравнения, которые можно использовать в коде VBA:

Оператор сравнения

 Объяснение
=

Равно

Не равно

>

Больше чем

>=

Больше или равно
<

Меньше, чем
<=

Меньше или равно

Равно

В Равно Оператор проверяет, равны ли два значения, и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 5intB = 5Если intA = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA равно intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Сначала мы устанавливаем значения intA а также intB к 5:

После этого воспользуемся = в операторе If, чтобы проверить, соответствуют ли значения intA а также intB равны:

12345 Если intA = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

Обе переменные равны 5, поэтому blnResult возвращает True:

Изображение 1. Использование оператора Equal To

Не равно

В Нет Равно Оператор проверяет, не равны ли два значения, и возвращает True или False. Вот пример кода:

Произошла ошибка. Пожалуйста, попробуйте позже.

В этом примере мы хотим проверить, intA не равно intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Мы используем в операторе If, чтобы проверить, соответствуют ли значения intA а также intB разные:

12345 Если intA intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

Значение intA равно 5, а значение intB равно 6, переменные не равны, поэтому blnResult возвращает True:

Изображение 2. Использование оператора Not Equal To

Больше чем

В Больше чем Оператор проверяет, больше ли первое значение второго и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 6intB = 5Если intA> intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA больше, чем intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Кроме того, мы используем > в операторе If, чтобы проверить, имеет ли значение intA больше, чем intB:

12345 Если intA> intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В заключение, посколькуintA больше, чем intB, то blnResult возвращает True:

Изображение 3. Использование оператора «Больше, чем»

Больше или равно

В Больше или равно Оператор проверяет, больше ли первое значение второму или равно ему, и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 5intB = 5Если intA> = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA Больше или равно intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Мы используем>= в операторе If, чтобы проверить, имеет ли значение intA Больше или равно intB:

12345 Если intA> = intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В заключение, поскольку обе переменные равны 5, blnResult возвращает True:

Изображение 4. Использование оператора «Больше или равно»

Меньше, чем

В Меньше, чем Оператор проверяет, меньше ли первое значение второго и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 5intB = 6Если intA <intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA меньше чем intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Мы используем < в операторе If, чтобы проверить, имеет ли значение intA меньше чем intB:

12345 Если intA <intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В качестве intA меньше чем intB, то blnResult возвращает True:

Изображение 5. Использование оператора «Меньше чем»

Меньше или равно

В Меньше или Равно Оператор проверяет, меньше ли первое значение или равно ему, и возвращает True или False. Вот пример кода:

123456789101112 Dim intA как целое числоDim intB как целое числоDim blnResult As BooleanintA = 5intB = 5Если intA <= intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В этом примере мы хотим проверить, intA меньше или равно intB. Если это правда, значение Boolean blnResult будет True, в противном случае — False.

Мы используем <= в операторе If, чтобы проверить, имеет ли значение intA меньше или равно intB:

12345 Если intA <= intB ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, если

В заключение, поскольку обе переменные равны 5, blnResult возвращает True:

Изображение 6. Использование оператора «Меньше или равно»

Оператор

Оператор Is проверяет, содержат ли две объектные переменные один и тот же объект:

12345678910111213 Sub CompareObjects ()Dim ws1 как рабочий лист, ws2 как рабочий листУстановить ws1 = Sheets («Sheet1»)Установить ws2 = Sheets («Sheet2»)Если ws1 Is ws2, тоMsgBox «Тот же WS»ЕщеMsgBox «Различные WS»Конец, еслиКонец подписки

Оператор Like

Оператор Like может использоваться для поиска неточных текстовых совпадений. В этом примере проверяется, начинается ли строка с «Мистер».

1234567891011121314 Sub LikeDemo ()Dim strName As StringDim blnResult As BooleanstrName = «Мистер Майкл Джеймс»Если strName Like «Mr *» ТогдаblnResult = TrueЕщеblnResult = ЛожьКонец, еслиКонец подписки

Если вы хотите узнать, как сравнивать строки, щелкните здесь: VBA Compare Strings — StrComp

Если вы хотите узнать, как использовать операторы сравнения, щелкните здесь: Логические операторы VBA

Источник

Понравилась статья? Поделить с друзьями:
  • Vba excel открыть книгу для записи
  • Vba excel оператор условия
  • Vba excel открыть книгу в фоновом режиме
  • Vba excel оператор like
  • Vba excel открыть для чтения открытый файл