Операторы сравнения чисел и строк, ссылок на объекты (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 вы можете ознакомиться в статье Знаки подстановки для шаблонов.
In this Article
- Main Comparison Operators in VBA
- Not Equal To (<>)
- Cell Value Not Equal To
- Equal To
- Greater Than / Less Than
- Greater Than or Equal To / Less Than or Equal To
- Is Operator
- Like Operator
VBA allows you to use comparison operators to compare values. By using these operators, you can compare values and return a Boolean True or False as a result.
Main Comparison Operators in VBA
These are the main comparison operators used in VBA:
Comparison Operator |
Explanation |
= |
Equal to |
<> |
Not Equal to |
> |
Greater than |
>= |
Greater than or Equal to |
< |
Less than |
<= |
Less than or Equal to |
Not Equal To (<>)
The Not Equal to operator is <>. It checks if two values are not equal and returns TRUE or FALSE. It’s a combination of the Less Than and Greater Than operators.
This example will test if 5 does not equal 3 and return FALSE in a MessageBox:
MsgBox 5 <> 3
Cell Value Not Equal To
There are several ways you might compare numbers. In the previous example, we hard-coded 5 and 3 into our code. Let’s demonstrate two other ways to compare values.
This example will test if two cell values are not equal to each other:
MsgBox Range("A1").Value <> Range("B1").value
Another way to compare values is with Variables.
Sub NotEqualTo ()
Dim intA As Integer
Dim intB As Integer
Dim blnResult As Boolean
intA = 5
intB = 6
If intA <> intB Then
blnResult = True
Else
blnResult = False
End If
End Sub
In this example, we want check if Integer Variable intA is not equal to intB. If this is true, the value of Boolean variable blnResult will be True, otherwise, it will be False.
We use the <> operator in the If Statement to check if the values of intA and intB are different:
If intA <> intB Then
blnResult = True
Else
blnResult = False
End If
The value of intA is 5 and the value of intB is 6, the variables are not equal, therefore the blnResult returns True:
Equal To
The Equal to operator works exactly the same. It checks if two values are equal and returns True or False. Here is the example code:
Sub EqualTo ()
Dim intA As Integer
Dim intB As Integer
Dim blnResult As Boolean
intA = 5
intB = 5
If intA = intB Then
blnResult = True
Else
blnResult = False
End If
End Sub
In this example, we want to check if intA is equal to intB. If this is true, the value of Boolean blnResult will be True, otherwise, it will be False.
First, we set values of intA and intB to 5:
intA = 5
intB = 5
After that, we use the = operator in the If statement to check if the values of intA and intB are equal:
If intA = intB Then
blnResult = True
Else
blnResult = False
End If
Both variables are equal to 5, therefore the blnResult returns True:
Greater Than / Less Than
The Greater Than (>) and Less Than (<) operators work exactly the same way.
Greater Than
MsgBox 5 > 3
Less Than
MsgBox 5 < 3
Greater Than or Equal To / Less Than or Equal To
To test if a value is Greater Than or Equal To, combine the Equal To (=) operator and the Greater Than (>) / Less Than (<) operators.
Greater Than or Equal To
MsgBox 5 >= 3
Less Than or Equal To
MsgBox 5 <= 3
Let’s use Greater Than or Equal To in the same procedure we have been using:
Sub GreaterThanEqualTo ()
Dim intA As Integer
Dim intB As Integer
Dim blnResult As Boolean
intA = 5
intB = 5
If intA >= intB Then
blnResult = True
Else
blnResult = False
End If
End Sub
In this example, we want to check if intA is greater than or equal to intB. If this is true, the value of Boolean blnResult will be True, otherwise, it will be False.
We use the >= operator in the If statement to check if the value of intA is greater than or equal to intB:
If intA >= intB Then
blnResult = True
Else
blnResult = False
End If
In conclusion, as both variables are equal to 5, the blnResult returns True:
VBA Coding Made Easy
Stop searching for VBA code online. Learn more about AutoMacro — A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!
Learn More
Is Operator
The Is Operator tests if two object variables contain the same object:
Sub CompareObjects()
Dim ws1 As Worksheet, ws2 As Worksheet
Set ws1 = Sheets("Sheet1")
Set ws2 = Sheets("Sheet2")
If ws1 Is ws2 Then
MsgBox "Same WS"
Else
MsgBox "Different WSs"
End If
End Sub
Like Operator
The Like Operator can be used to find inexact text matches. This example will test if a string starts with “Mr.”
Sub LikeDemo()
Dim strName As String
Dim blnResult As Boolean
strName = "Mr. Michael James"
If strName Like "Mr*" Then
blnResult = True
Else
blnResult = False
End If
End Sub
If you want to learn how to compare strings, click here: VBA Compare Strings – StrComp
If you want to learn more about how to use logical operators, click here: VBA Logical Operators
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
Download the above Excel Code
Not Equal is an operator in VBA, also called a negation operator. It is a logical function, so the output returned by this function is either “True” or “False.” We know that the equal operator is “=” this but not equal is “<>” in VBA, so whatever the value we get from the equal operator, we will get the exact opposite value using the Not Equal operator.
“Not Equal” Operator in VBA
Usually, we do a logical test “whether something is equal to other things or not.” Sometimes, we also need to do the “inequality” test. The inequality test is nothing but not an equal test. Generally, we say if something is equal to another thing or not. If it is equal, perform some task if not a different task. Similarly, we can also do some operations using the Inequality test. For example, “NOT EQUAL” in VBA represents the combination of greater than and less than symbols. If both these operators are combined, then it becomes not equal, i.e., “<>.“
Table of contents
- “Not Equal” Operator in VBA
- How Not Equal to Works in Excel VBA?
- Examples of Not Equal to in Excel VBA
- Example #1
- Example #2
- Hide and Unhide Sheets with Not Equal Sign
- #1 – Hide All Sheets except One Sheet
- #2 – Unhide All Sheets except One Sheet
- Recommended Articles
How Not Equal Works in Excel VBA?
VBA Not Equal works exactly opposite to the logic of equal to operator. Equal to operator returns TRUE if the supplied test is satisfied is not, it will return FALSE. So, for example, if you say 10 = 10, it will return TRUE or else FALSE.
Conversely, “Not Equal” works in the opposite direction. If the supplied logical test in excelA logical test in Excel results in an analytical output, either true or false. The equals to operator, “=,” is the most commonly used logical test.read more is not equal, then only it will return TRUE or else FALSE.
For example, if you say 10 <> 10, it will return FALSE because 10 equals 10. Therefore, one value should not be equal to the other value to get a TRUE result.
You are free to use this image on your website, templates, etc, Please provide us with an attribution linkArticle Link to be Hyperlinked
For eg:
Source: VBA Not Equal (wallstreetmojo.com)
Examples of Not Equal to in Excel VBA
Below are the examples of not equal to the operator in Excel VBA.
Example #1
Now, we will see how to practically use the VBA Not Equal (<>) sign. Look at the below piece of code.
Code:
Sub NotEqual_Example1() Dim k As String k = 100 <> 100 MsgBox k End Sub
Here, we are testing whether the number 100 is not equal to the number 100. We know the number 100 equals 100, so the result will be FALSE.
Now, we will change the equation.
Code:
Sub NotEqual_Example1() Dim k As String k = 100 <> 99 MsgBox k End Sub
Now, the test is whether the number 100 is not equal to 99. So the result will be TRUE.
Example #2
Now, we will see how to use this not equal operator in real-time examples. For the demonstration, we have created some data.
We have “Value 1” and “Value 2.”
Now, our requirement is if Value 1 is not equal to Value 2, then we need the result as “Different,” or else we need the result as “Same.”
Step 1: Define a variable as an Integer.
Code:
Sub NotEqual_Example2() Dim k As Integer End Sub
Step 2: Open FOR NEXT LOOP from 2 to 9.
Code:
Sub NotEqual_Example2() Dim k As Integer For k = 2 To 9 Next k End Sub
Step 3: Inside the loop, we need to test whether Value 1 is not equal to Value 2. Since we need our results, we need to use IF Condition.
Code:
Sub NotEqual_Example2() Dim k As Integer For k = 2 To 9 If Cells(k, 1) <> Cells(k, 2) Then Cells(k, 3).Value = "Different" Else Cells(k, 3).Value = "Same" End If Next k End Sub
Suppose the condition tests whether Value 1 is not equal to Value 2 or not. If not equal, it will return “Different.” If equal, it will return “Same.”
You can copy and paste the below VBA codeVBA code refers to a set of instructions written by the user in the Visual Basic Applications programming language on a Visual Basic Editor (VBE) to perform a specific task.read more.
Copy this code to your module and run using the F5 key or manually. It will return a result like this.
Hide and Unhide Sheets with Not Equal Sign
The various ways of using not equal sign are enormous. However, we can use this sign to fulfill our needs.
#1 – Hide All Sheets except One Sheet
We have seen this kind of situation many times. We needed to hide all the sheets except the particular sheet.
For example, if you want to hide all sheets except the sheet name “Customer Data,” then you can use this code.
Code:
Sub Hide_All() Dim Ws As Worksheet For Each Ws In ActiveWorkbook.Worksheets If Ws.Name <> "Customer Data" Then Ws.Visible = xlSheetVeryHidden End If Next Ws End Sub
Note: Change the worksheet name to your worksheet name.
#2 – Unhide All Sheets except One Sheet
Similarly, we can also unhide all sheets except one sheet. Use the below code to do this.
Code:
Sub Unhide_All() Dim Ws As Worksheet For Each Ws In ActiveWorkbook.Worksheets If Ws.Name <> "Customer Data" Then Ws.Visible = xlSheetVisible End If Next Ws End Sub
You can download this VBA Not Equal to Excel template here – VBA Not Equal Operator Template.
Recommended Articles
This article has been a guide to VBA, Not Equal. Here, we look at how to use the logical operator “Not Equal to” in VBA, along with practical examples and downloadable Excel sheets. Below are some useful VBA-related articles: –
- Not Function in Excel VBA
- VBA StrConv
- VBA Integer
Содержание
- Comparison Operators in Visual Basic
- Сравнение числовых значений
- Сравнение строк
- Сравнение объектов
- Сравнение типа объекта
- Операторы сравнения
- Синтаксис
- Замечания
- Пример
- См. также
- Поддержка и обратная связь
- Операторы VBA: арифметические, логические, сравнения, присвоения
Comparison Operators in Visual Basic
Операторы сравнения сравнивают два выражения и возвращают Boolean значение, представляющее связь их значений. Существуют операторы для сравнения числовых значений, операторы для сравнения строк и операторы для сравнения объектов. Здесь рассматриваются все три типа операторов.
Сравнение числовых значений
Visual Basic сравнивает числовые значения с помощью шести операторов числового сравнения. Каждый оператор принимает в качестве операндов два выражения, которые вычисляют числовые значения. В следующей таблице перечислены операторы и приведены примеры каждого из них.
Оператор | Условие протестировано | Примеры |
---|---|---|
= (Равенство) | Равно ли значение первого выражения значению второго? | 23 = 33 ‘ False
23 = 12 ‘ False |
<> (Неравенство) | Не соответствует ли значение первого выражения значению второго? | 23 <> 33 ‘ True
23 <> 12 ‘ True |
(Меньше) | Значение первого выражения меньше значения второго? | 23 33 ‘ True
23 12 ‘ False |
> (Больше) | Является ли значение первого выражения больше значения второго? | 23 > 33 ‘ False
23 > 12 ‘ True |
(Меньше или равно) | Является ли значение первого выражения меньше или равно значению второго? | 23 33 ‘ True
23 12 ‘ False |
>= (Больше или равно) | Является ли значение первого выражения больше или равно значению второго? | 23 >= 33 ‘ False
23 >= 12 ‘ True |
Сравнение строк
Visual Basic сравнивает строки с помощью оператора Like , а также числовых операторов сравнения. Оператор Like позволяет указать шаблон. Затем строка сравнивается с шаблоном, и если она совпадает, результатом будет True . В противном случае результат будет False . Числовые операторы позволяют сравнивать String значения на основе порядка сортировки, как показано в следующем примере.
‘ The result of the preceding comparison is True.
Результатом в предыдущем примере является True то, что первый символ в первой строке сортируется перед первым символом во второй строке. Если первые символы равны, сравнение продолжится до следующего символа в обеих строках и т. д. Вы также можете проверить равенство строк с помощью оператора равенства, как показано в следующем примере.
‘ The result of the preceding comparison is True.
Если одна строка является префиксом другой, например «aa» и «aaa», длинная строка считается больше, чем более короткая строка. Это показано в следующем примере.
‘ The result of the preceding comparison is True.
Порядок сортировки основан на двоичном или текстовом сравнении в зависимости от параметра Option Compare . Дополнительные сведения см. в разделе Оператор Сравнения вариантов.
Сравнение объектов
Visual Basic сравнивает две ссылочные переменные объекта с оператором Is и Оператором IsNot. Можно использовать любой из этих операторов, чтобы определить, ссылаются ли две ссылочные переменные на один и тот же экземпляр объекта. Это показано в следующем примере.
В предыдущем примере x Is y принимает значение True , так как обе переменные ссылаются на один и тот же экземпляр . Сравните этот результат с приведенным ниже примером.
В предыдущем примере x Is y вычисляется False как , так как переменные ссылаются на объекты одного типа, они ссылаются на разные экземпляры этого типа.
Если вы хотите проверить наличие двух объектов, не указывающих на один и тот же экземпляр, IsNot оператор позволяет избежать грамматического неуклюжего сочетания Not и Is . Это показано в следующем примере.
В предыдущем примере If a IsNot b эквивалентно If Not a Is b .
Сравнение типа объекта
С помощью выражения . Is можно проверить, имеет ли объект определенный тип TypeOf . Синтаксис выглядит следующим образом:
Если typename указывает тип интерфейса, выражение . Is возвращает значение True , TypeOf если объект реализует тип интерфейса. Если typename является типом класса, выражение возвращает True значение , если объект является экземпляром указанного класса или класса, производного от указанного класса. Это показано в следующем примере.
В предыдущем примере выражение принимает значение , TypeOf x Is Control так как тип x — Button , который наследуется от Control . True
Дополнительные сведения см. в разделе Оператор TypeOf.
Источник
Операторы сравнения
Используется для сравнения выражений.
Синтаксис
Результат = expression1comparisonoperatorexpression2result = object1Isobject2result = stringLikepattern
Операторы сравнения состоят из следующих частей:
Part | Описание |
---|---|
result | Обязательный элемент; любая числовая переменная. |
выражение | Обязательный элемент; любое выражение. |
comparisonoperator | Обязательный элемент; любой оператор сравнения. |
object | Обязательный; любое имя объекта. |
строка | Обязательный элемент; любое строковое выражение. |
pattern | Обязательный элемент; любое строковое выражение или диапазон символов. |
Замечания
Следующая таблица содержит список операторов сравнения и условий, определяющих, имеет ли результатзначение True, False или Null.
Оператор | True, если | False, если | Null, если | ||||
---|---|---|---|---|---|---|---|
(Меньше) | expression1 = expression2 | expression1 или expression2 = NULL | |||||
(Меньше или равно) | expression1 expression2 | expression1 или expression2 = NULL | |||||
> (Больше) | expression1>expression2 | expression1 >= (Больше или равно) | expression1> = expression2 | expression1 = (Равно) | expression1 = expression2 | expression1<>expression2 | expression1 или expression2 = NULL |
<> (Не равно) | expression1<>expression2 | expression1 = expression2 | expression1 или expression2 = NULL |
Операторы Is и Like обладают особыми возможностями сравнения, которые отличаются от возможностей операторов, приведенных в таблице.
При сравнении двух выражений, возможно, будет нелегко определить, сравниваются ли выражения как числа или как строки. В следующей таблице показано, как сравниваются выражения или результат, если любое из выражений не является Variant.
Если | Then |
---|---|
Оба выражения представляют собой числовые типы данных (Byte, Boolean, Integer, Long, Single, Double, Date, Currency или Decimal) | Выполните числовое сравнение. |
Оба выражения имеют тип String | Выполняется сравнение строк. |
Одно выражение является числовым типом данных, а другое — типом Variant, который равен числу или может им быть | Выполните числовое сравнение. |
Одно выражение является числовым типом данных, а другое — строкой Variant, которая не может быть преобразована в число | Возникает Type Mismatch ошибка. |
Одно выражение — String, а другое — любое значение Variant за исключением Null | Выполните строковое сравнение. |
Одно выражение — Empty, а другое является числовым типом данных | Выполните числовое сравнение, используя 0 в качестве выражения Empty. |
Одно выражение — Empty, а другое — String | Выполните строковое сравнение, используя строку нулевой длины («») в качестве выражения Empty. |
Если оба выражения expression1 и expression2 являются выражениями типа Variant, порядок их сравнения определяется их базовым типом. В следующей таблице показано, как сравниваются выражения или результат сравнения в зависимости от базового типа Variant.
Если | Then |
---|---|
Оба выражения Variant являются числовыми | Выполните числовое сравнение. |
Оба выражения Variant являются строками | Выполните строковое сравнение. |
Одно выражение Variant числовое, а другое строка | Числовое выражение меньше, чем строковое выражение. |
Одно выражение Variant — Empty, а другое — числовое | Выполните числовое сравнение, используя 0 в качестве выражения Empty. |
Одно выражение Variant — Empty, а другое — строка | Выполните строковое сравнение, используя строку нулевой длины («») в качестве выражения Empty. |
Оба выражения Variant — Empty | Выражения равны. |
Когда переменная Single сравнивается с переменной Double, значение Double округляется до точности типа Single. Если переменная Currency сравнивается с переменной Single или Double, значение Single или Double преобразуется в тип Currency.
Аналогично, когда переменная Decimal сравнивается с переменной Single или Double, значение Single или Double преобразуется в тип Decimal. Для типа Currency любое дробное значение менее чем 0,0001 может быть потеряно; для типа Decimal любое дробное значение менее чем 1E-28 может быть потеряно, или возможно возникновение ошибки переполнения. Потеря такого дробного значения может привести к тому, что два сравниваемых значения будут равны, когда на самом деле они не равны.
Пример
В этом примере показаны различные варианты использования операторов сравнения, которые применяются для сравнения выражений.
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Источник
Операторы VBA: арифметические, логические, сравнения, присвоения
Операторы VBA: арифметические, логические, сравнения, присвоения
Оператор — это наименьшая способная выполняться единица кода VBA. Оператор может объявлять или определять переменную, устанавливать параметр компилятора VBA или выполнять какое-либо действие в программе.
Арифметических операторов в VBA всего 7. Четыре стандартных: сложение (+), вычитание (-), умножение (*), деление (/) и еще три:
- возведение в степень (^), например 2^3 = 8;
- целочисленное деление (). Делит первое число на второе, отбрасывая (не округляя) дробную часть. Например, 52 = 2;
- деление по модулю (Mod). Делит первое число на второе, возвращая только остаток от деления. Например, 5 Mod 2 = 1.
Оператор присвоения в VBA — знак равенства. Можно записывать так: Let nVar = 10
а можно еще проще: nVar = 10
Во втором случае не путайте знак равенства с оператором равенства.
Выражение nVar = 10 значит «присвоить переменной nVar значение 10», а если строка выглядит так:
If (nVar = 10) то это значит «если значение переменной nVar равно 10».
Если переменной нужно назначить объект, то делается это другими способами.
Операторов сравнения в VBA всего 8:
- равенство (=), например, If (nVar = 10);
- больше, чем и меньше, чем (> и 10) ;
- больше или равно и меньше или равно (>= и ≤), например, If (nVar >= 10) ;
- не равно (<>), например, If (nVar<>10) ;
- сравнение объектов (Is). Определяет, ссылаются объектные переменные на тот же объект или на разные, например, If (obj1 is obj2) ;
- подобие (Like). Сравнивает строковый объект с шаблоном и определяет, подходит ли шаблон.
Операторы сравнения всегда возвращают true или false — true, если утверждение истинно, и false, если ложно.
Немного про сравнение строковых значений:
- при сравнении строковых значений регистр учитывается;
- пробелы в строковых значениях также учитываются;
- при сравнении текстовых строк на больше/меньше по умолчанию сравниваются просто двоичные коды символов — какие больше или меньше. Если нужно использовать тот порядок, который идет в алфавите, то можно воспользоваться командой
Option Compare Text
Чуть подробнее про оператор Like. Общий его синтаксис выглядит как
Выражение1 Like Выражение2
При этом Выражение1 — любое текстовое выражение VBA, а Выражение2 — шаблон, который передается оператору Like. В этом шаблоне можно использовать специальные подстановочные символы
Источник