Vba excel не равно — Мир ПК

VBA-Урок 7.1. Условия (Conditions)

Условия являются очень полезными при программировании, поскольку позволяют нам выполнять действия, в зависимости от установленных критериев (используется такой же принцип как и в IF функции Excel).

Наиболее важной функцией, которая задает условие является IF и сейчас мы посмотрим, как она работает:

Давайте перейдем к практике и вернемся к примеру, который мы использовали в уроке с переменными. Цель этой процедуры была в том, чтобы открыть диалоговое окно, которое бы содержало значение из строки, указанного в ячейке F5 :

Если вы введете букву в ячейку F5 , это повлечет ошибку. Мы хотим предотвратить это.

Давайте добавим условие, которое будет проверять — является ли введенное значение в ячейку F5 числом, перед тем, как код будет выполнен.

Мы воспользуемся функцией IsNumeric для проверки условия:

Нам также нужно прописать инструкции, если поставленное нами условие не выполнится:

Теперь нечисловое значения не повлечет никаких проблем.

Работая с нашим массивом, который содержит 16 строк данных, наш следующий шаг будет в проверке является ли переменная row_number: «больше чем или равно 2» и «меньше чем или равно 17».

Но сначала взглянем на операторы сравнения:

=	равно
<>	не равно
больше чем
>=	больше или равно

и эти полезные операторы:

AND	[условие1] AND [условие2] Два условия должны быть выполнены
OR	[условие1] OR [условие2] Не менее 1 из 2 условий должно быть выполнено
NOT	NOT [условие1] Условие не должно выполниться

Теперь давайте добавим одно из выше указанных условий AND между операторов сравнения:

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

Для того, чтобы сделать это, мы должны создать переменную nb_rows и добавить эту функцию.

В этом случае, мы используем функцию WorksheetFunction.CountA , которая является аналогом функции COUNTA в самом Excel.

Мы хотим, чтобы эта функция подсчитала количество непустых ячеек в первой колонке по записала полученное значение в переменную nb_rows:

ElseIf

ElseIf дает возможность добавлять дополнительные условия после IF команды:

Если УСЛОВИЕ 1 выполняется, Инструкция 1 будет выполнена и покинет оператор IF (который начинается с IF и заканчивается End If ). Если УСЛОВИЕ 2 принимает значение » ложь «, тогда будет выполнена Инструкция 2 , и если она в свою очередь возвращает » ложь «, тогда Инструкция 3 (под Else ) будет выполнена.

Далее есть пример с оценками от 1 до 6 в ячейке A1 и комментарием к этим оценкам в ячейке B1:

Select

Существует альтернатива использованию If со многими ElseIf инструкциями, а именно команда Select , которая больше подходит к такого рода ситуаций.

Рассмотрим пример макроса с оператором Select:

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

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

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

Оператор	Синтаксис	Описание
=	A = B	Равенство: Если А равно В, то — True. Иначе — False
Если А меньше В, то — True. Иначе — False
Если А меньше или равно В, то — True. Иначе — False
>	A > B	Больше: Если А больше В, то — True. Иначе — False
>=	A >= B	Больше или равно: Если А больше или равно В, то — True. Иначе — False
<>	A <> B	Не равно: Если А не равно В, то — True. Иначе — False

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

Результатом любой операции сравнения является значение типа Boolean: True, False.

Если оба операнда в выражении сравнения имеют один и тот же тип данных, VBA выполняет простое сравнение для этого типа.

Если оба операнда в выражении сравнения имеют определенные типы и эти типы не являются совместимыми, VBA выдает сообщение об ошибке несовпадения типов.

Если один или оба операнда в выражении сравнения являются переменными типа Variant, VBA пытается преобразовать тип Variant в какой-либо совместимый тип.

Сравнение строк

При сравнении строк операторами отношения, VBA сравнивает каждую строку слева направо посимвольно.

В VBA одна строка равна другой только, когда обе строки содержат точно такие же символы в точно таком же порядке и обе строки имеют одну и ту же длину. Например, строки «абвгд» «абвгд » » абвгд» не равны между собой, т.к. VBA не игнорирует начальные или конечные символы пробела при сравнении строк.

Следует быть внимательным при сравнении строк переменной длины.

Двоичное и текстовое сравнение строк

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

При выполнении двоичного сравнения строковой информации VBA использует бинарный эквивалент числа для каждого символа. Такой метод сравнения называется двоичным или бинарным и является методом сравнения по умолчанию.

Т.к. буквы верхнего регистра имеют меньшие двоичные номера, буквы верхнего регистра располагаются в алфавитном порядке перед буквами нижнего регистра. Поэтому при двоичном сравнении строк, строка «АБВ» будем меньше строки «абв».

При текстовом сравнении строк VBA не использует двоичный эквивалент символов, и не «различает» верхнего и нижнего регистра. В текстовом сравнении строка «абв» равна строке «АБВ».

Для выбора метода сравнения строк используется директива Option Compare

Option Compare [Text | Binary]

Данная директива должна находиться в области объявления модуля.

Конкатенация строк

Присоединение одной строки к другой называется конкатенацией строк.

Конкатенацию строк обычно используют для формирования строк из различных источников в процедуре, чтобы создавать сообщение для вывода на экран. В VBA имеется два оператора для конкатенации строк.

Оператор конкатенации (&)

Оператор (&)в VBA используется только для конкатенации строк.

Операнд_1 & Операнд_2 [& Операнд_3..]

Операнд_N — любое допустимое строковое или численное выражение (которое преобразуется в строковое).

Тип данных результата конкатенации строк — String.

Если операнд в выражении конкатенации строк имеет значение Empty или Null, VBA интерпретирует этот операнд как строку нулевой длины (строка не содержащая символов).

Обратите внимание! Символ (&) операции конкатенации обязательно необходимо отделять пробелом от имени переменной, т.к. в противном случае VBA может интерпретировать этот символ как символ определения типа Long.

Оператор сложения в конкатенации строк

Для конкатенации строк можно также использовать оператор (+).

Этот оператор имеет такой же синтаксис и требования, как и оператор (&). Однако следует понимать, что в VBA основное предназначение оператора (+) — это арифметическое сложение. Поэтому, чтобы избежать двусмысленности чтения программного кода, для конкатенации строк настоятельно рекомендуется использовать именно оператор (&).

Приоритеты выполнения операций

Многие из выражений в программной коде являются сложными (составными), т.е. состоят из двух или более выражений.

При вычислении сложных выражений VBA следует следующим правилам:

• Части выражения, заключенные в круглые скобки, всегда вычисляются в первую очередь;
• Конкретные операции выполняются в зависимости от иерархии операторов (таблица ниже);
• При равенстве иерархии операторов, они вычисляются слева направо.

Оператор	Комментарии
^	Возведение в степень, высший приоритет
—	Унарный минус
* /	Умножение и деление имеют равные приоритеты
MOD
+ —	Сложение и вычитание имеют равные приоритеты
&	Конкатенация строк выполняется после арифметических операций перед операциями сравнения и логическими операциями
= ><>	Все операции сравнения имеют равные приоритеты и выполняются слева направо. Для группирования операций надо пользоваться круглыми скобками
NOT
AND
OR
XOR
EQV
IMP

В начало страницы

В начало страницы

Visual Basic for Application.

Краткие теоретические сведения

1. Синтаксис и семантика языка программирования VBA

Синтаксис языка программирования — набор правил, описывающий комбинации символов алфавита, считающиеся правильно структурированной программой (документом) или её фрагментом.

Основные синтаксические принципы этого языка следующие:

• VBA нечувствителен к регистру;
• чтобы закомментировать код до конца строки, используется одинарная кавычка (‘) или команда REM;
• символьные значения должны заключаться в двойные кавычки («);
• максимальная длина любого имени в VBA (переменные, константы, процедуры) — 255 символов;
• начало нового оператора — перевод на новую строку (точка с запятой, как в C, Java, JavaScript, для этого не используется);
• ограничений на максимальную длину строки нет (хотя в редакторе в строке помещается только 308 символов). Несколько операторов в одной строке разделяются двоеточиями:
  MsgBox «Проверка 1» : MsgBox «Проверка 2»
• для удобства чтения можно объединить несколько физических строк в одну логическую при помощи пробела и знака подчеркивания после него:
  MsgBox «Сообщение пользователю» _
  & vUserName

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

Оператор — это наименьшая способная выполняться единица кода VBA. Оператор может объявлять или определять переменную, устанавливать параметр компилятора VBA или выполнять какое-либо действие в программе.

Арифметических операторов в VBA всего 7.

Четыре стандартных: сложение (+), вычитание (−), умножение (*), деление (/), и еще три:

• возведение в степень (^). Например, 2^3 = 8;
• целочисленное деление (). Делит первое число на второе, отбрасывая (не округляя) дробную часть. Например, 52 = 2;
• деление по модулю (Mod). Делит первое число на второе, возвращая только остаток от деления. Например, 5 Mod 2 = 1.

Оператор присваивания в VBA — это знак равенства. Можно записывать так:

Здесь не путайте знак равенства с оператором равенства. Последнее выражение означает «присвоить переменной nVar значение 10», а если строка выглядит так: If (nVar = 10) , то это значит «если значение переменной nVar равно 10».

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

• равенство (=). Например, If (nVar = 10);
• больше, чем (>) и меньше, чем ( 10);
• больше или равно (>=) и меньше или равно ( = 10);
• не равно (<>). Например, If (nVar<>10);
• сравнение объектов (Is). Определяет, ссылаются объектные переменные на один и тот же объект или на разные. Например, If (obj1 is obj2);
• подобие (Like). Сравнивает строковый объект с шаблоном и определяет, подходит ли шаблон.

Операторы сравнения всегда возвращают True (если утверждение истинно) или False (если утверждение ложно).

Очень часто при проверке нескольких условий используются логические операторы:

• And — логическое И. Должны быть истинными оба условия;
• Or — логическое ИЛИ. Должно быть истинным хотя бы одно из условий;
• Not — логическое отрицание. Возвращает True, если условие ложно;
• Xor — логическое исключение. В выражении E1 Xor E2 возвращает True, если только E1 = True или только E2 = True, иначе — False;
• Eqv — эквивалентность двух выражений, возвращает True, если они имеют одинаковое значение;
• Imp — импликация, E1 Imp E2 возвращает False, если E1 = True и E2 = False, иначе — True.

Помнить нужно про And, Or, Not, остальные логические операторы используются редко.

Переменные — это контейнеры для хранения изменяемых данных. Без них не обходится практически ни одна программа. Для простоты переменную можно сравнить с номерком в гардеробе — вы сдаете в гардероб какие-то данные, в ответ вам выдается номерок. Когда вам опять потребовались эти данные, вы «предъявляете номерок» и получаете их.

Каждая переменная имеет имя. Обращение к переменной происходит по имени. Правила выбора имен в VBA едины для многих элементов (переменные, константы, функции, процедуры и т. п.):

• имя должно начинаться с буквы;
• не должно содержать пробелов и символов пунктуации (исключение — символ подчеркивания);
• максимальная длина — 255 символов;
• должно быть уникальным в текущей области видимости
• зарезервированные слова (те, которые подсвечиваются синим цветом в окне редактора кода) использовать нельзя.

При создании программ VBA рекомендуется определиться с правилами, по которым будут присваиваться имена объектам — соглашение об именовании. Чаще всего используется так называемое венгерское соглашение (в честь одного из программистов Microsoft, Charles Simonyi, венгра по национальности):

• имя переменной должно начинаться с префикса, записанного строчными буквами. Префикс указывает, что именно будет храниться в этой переменной:
  • str (или s) — String, символьное значение;
  • fn (или f) — функция;
  • sub — процедура;
  • c (или все буквы имени заглавные) — константа (контейнер для хранения данных, которые, в отличие от переменных, не изменяются в ходе выполнения VBA-программы);
  • b — Boolean, логическое значение (True или False);
  • d — дата;
  • obj (или o) — ссылка на объект;
  • n — числовое значение;
• имена функций, методов и каждое слово в составном слове должно начинаться с заглавной буквы:
  MsgBox objMyDocument.Name
  Sub CheckDateSub()

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

2. Основные типы данных VBA

В VBA предусмотрены следующие типы данных:

• числовые:
  • Byte — целое число от 0 до 255, для хранения нужен 1 байт памяти;
  • Integer — целое число от −32 768 до 32 767, 2 байта;
  • Long — большое целое число от −2 147 483 648 до 2 147 483 647, 4 байта;
  • Currency (денежный) — большое десятичное число с 19 позициями, включая 4 позиции после запятой
  (от –922337203685477,5808 до 922337203685477,5807), 4 байта,
  используется для хранения чисел, когда точность крайне важна, что бывает при вычислениях с денежными единицами;
  • Decimal — еще большее десятичное число с 29 позициями (после запятой можно использовать от 0 до 28 позиций), 8 байт;
  • Single и Double — значения с плавающей запятой (4 и 8 байт)
  (от -3.402823·10 38 до -1.401298·10 -45 для отрицательных значений и
  от 1.401298·10 -45 до 3.402823·10 38 для положительных значений для Single, и
  от -1.79769313486232·10 308 до -4.94065645841247·10 -324 для отрицательных значений и
  от 4.94065645841247·10 -324 до 1.79769313486232·10 308 для положительных значений для Double);
• строковые (String переменной длины (примерно до 2 млрд символов) и фиксированной длины (примерно до 65 400 символов));
• дата и время (Date — от 01.01.100 до 31.12.9999), 8 байт;
• логический (Boolean — может хранить только значения True и False), 2 байта;
• объектный (Object — хранит ссылку на любой объект в памяти);
• Variant — специальный тип данных, который может хранить любые типы данных, 16 байт +1

Обозначения типов данных является ключевыми словами языка (и выделяется после набора в редакторе VBA).

Над различными типами данных допустимы различные операции. В VBA имеются три основных типа операций:

• математические, выполняются над числами, их результатом являются числа;
• операции отношения, могут применяться не только к числам, их результатом является значения логического типа;
• логические, используются в логических выражениях и их результатом являются логические значения.

3. Приоритеты операций

Приоритет	Операция
1 2 3 4 5 6 7 8 9 10 11 12	Вызов функции и скобки ^ — (смена знака) *, / Mod +, – >, =, , = Not And Or Xor

4. Математические функции

Функция	Возвращаемое значение
Abs ( )	Модуль (абсолютная величина) числа
Atn ( )	Арктангенс
Cos ( )	Косинус
Exp ( )	Экспонента, т. е. результат возведения основания натурального логарифма в указанную степень
Log( )	Натуральный логарифм
Rnd ( )	Случайное число из интервала [0,1).

Если число меньше нуля, то Rnd возвращает каждый раз одно и то же число, используя аргумент в качестве опорного числа. Если число больше нуля или аргумент опущен, то — следующее случайное число в последовательности; если число равняется нулю то — случайное число, возвращенное при предыдущем вызове этой функции.

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

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

Оператор	Синтаксис	Описание
=	A = B	Равенство: Если А равно В, то — True. Иначе — False
Если А меньше В, то — True. Иначе — False
Если А меньше или равно В, то — True. Иначе — False
>	A > B	Больше: Если А больше В, то — True. Иначе — False
>=	A >= B	Больше или равно: Если А больше или равно В, то — True. Иначе — False
<>	A <> B	Не равно: Если А не равно В, то — True. Иначе — False

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

Результатом любой операции сравнения является значение типа Boolean: True, False.

Если оба операнда в выражении сравнения имеют один и тот же тип данных, VBA выполняет простое сравнение для этого типа.

Если оба операнда в выражении сравнения имеют определенные типы и эти типы не являются совместимыми, VBA выдает сообщение об ошибке несовпадения типов.

Если один или оба операнда в выражении сравнения являются переменными типа Variant, VBA пытается преобразовать тип Variant в какой-либо совместимый тип.

Сравнение строк

При сравнении строк операторами отношения, VBA сравнивает каждую строку слева направо посимвольно.

В VBA одна строка равна другой только, когда обе строки содержат точно такие же символы в точно таком же порядке и обе строки имеют одну и ту же длину. Например, строки «абвгд» «абвгд » » абвгд» не равны между собой, т.к. VBA не игнорирует начальные или конечные символы пробела при сравнении строк.

Следует быть внимательным при сравнении строк переменной длины.

Двоичное и текстовое сравнение строк

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

При выполнении двоичного сравнения строковой информации VBA использует бинарный эквивалент числа для каждого символа. Такой метод сравнения называется двоичным или бинарным и является методом сравнения по умолчанию.

Т.к. буквы верхнего регистра имеют меньшие двоичные номера, буквы верхнего регистра располагаются в алфавитном порядке перед буквами нижнего регистра. Поэтому при двоичном сравнении строк, строка «АБВ» будем меньше строки «абв».

При текстовом сравнении строк VBA не использует двоичный эквивалент символов, и не «различает» верхнего и нижнего регистра. В текстовом сравнении строка «абв» равна строке «АБВ».

Для выбора метода сравнения строк используется директива Option Compare

Option Compare [Text | Binary]

Данная директива должна находиться в области объявления модуля.

Конкатенация строк

Присоединение одной строки к другой называется конкатенацией строк.

Конкатенацию строк обычно используют для формирования строк из различных источников в процедуре, чтобы создавать сообщение для вывода на экран. В VBA имеется два оператора для конкатенации строк.

Оператор конкатенации (&)

Оператор (&)в VBA используется только для конкатенации строк.

Операнд_1 & Операнд_2 [& Операнд_3..]

Операнд_N — любое допустимое строковое или численное выражение (которое преобразуется в строковое).

Тип данных результата конкатенации строк — String.

Если операнд в выражении конкатенации строк имеет значение Empty или Null, VBA интерпретирует этот операнд как строку нулевой длины (строка не содержащая символов).

Обратите внимание! Символ (&) операции конкатенации обязательно необходимо отделять пробелом от имени переменной, т.к. в противном случае VBA может интерпретировать этот символ как символ определения типа Long.

Оператор сложения в конкатенации строк

Для конкатенации строк можно также использовать оператор (+).

Этот оператор имеет такой же синтаксис и требования, как и оператор (&). Однако следует понимать, что в VBA основное предназначение оператора (+) — это арифметическое сложение. Поэтому, чтобы избежать двусмысленности чтения программного кода, для конкатенации строк настоятельно рекомендуется использовать именно оператор (&).

Приоритеты выполнения операций

Многие из выражений в программной коде являются сложными (составными), т.е. состоят из двух или более выражений.

При вычислении сложных выражений VBA следует следующим правилам:

• Части выражения, заключенные в круглые скобки, всегда вычисляются в первую очередь;
• Конкретные операции выполняются в зависимости от иерархии операторов (таблица ниже);
• При равенстве иерархии операторов, они вычисляются слева направо.

Оператор	Комментарии
^	Возведение в степень, высший приоритет
—	Унарный минус
* /	Умножение и деление имеют равные приоритеты
MOD
+ —	Сложение и вычитание имеют равные приоритеты
&	Конкатенация строк выполняется после арифметических операций перед операциями сравнения и логическими операциями
= ><>	Все операции сравнения имеют равные приоритеты и выполняются слева направо. Для группирования операций надо пользоваться круглыми скобками
NOT
AND
OR
XOR
EQV
IMP

В начало страницы

В начало страницы