Какая переменная в excel

Excel переменные в формуле

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

Использование формул

Ячейка, помимо текстовых и числовых данных, может содержать формулу . В этом случае в ячейке будет отображаться результат вычисления. Говоря на языке Excel, ячейка будет возвращать результат вычисления. Формула состоит из констант, переменных, а также математических операторов. В качестве переменных в формуле используются адреса ячеек. В саму формулу, соответственно, будет подставляться значение, содержащееся в указанной ячейке.

Простейшие формулы

Рассмотрим простой пример, в котором будем использовать таблицу, представленную на рис. 5.27.

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

Обратите внимание, к ячейкам столбца Цена применен формат Денежный. Данный формат добавляет к указанному числу 2 десятичных знака и обозначение денежной единицы. Такой же формат применен и к ячейкам столбца Стоимость, но на текущий момент эти ячейки пусты. В ячейки столбца Стоимость нужно добавить формулы, вычисляющие стоимость каждого товара. Это очень простые формулы, в которых нужно умножить цену единицы товара на его количество. В качестве переменных будут использоваться ячейки из столбцов Цена и Количество. Итак, начнем.

1. Создайте таблицу, аналогичную приведенной на рис. 5.37.
2. Выделите ячейку D2, в которой должна рассчитываться стоимость первого товара.
3. Введите знак = (равно). Ввод любой формулы начинается с этого знака.
4. Щелкните мышью по ячейке B2. Она будет выделена пунктирной рамкой, и адрес указанной ячейки окажется вставлен в формулу.
5. Введите знак * (звездочку). Это оператор умножения.
6. Щелкните мышью по ячейке C2. Адрес этой ячейки будет вставлен в формулу. Формула в ячейке D2 должна иметь вид =B2*C2.
7. Нажмите клавишу Enter, чтобы завершить ввод формулы (рис. 5.38).

Как только вы завершили ввод формулы, в ячейке D2 мгновенно появился результат вычисления. Значение, указанное в ячейке B2, было умножено на значение, указанное в ячейке C2, и результат умножения был возвращен ячейкой D2 (ячейкой, в которой находится формула). Выделите ячейку D2. Обратите внимание, в выделенной ячейке отображается результат вычисления. Но если вы посмотрите на строку формул, то увидите в ней формулу, содержащуюся в ячейке. Таким образом, в этой строке вы можете редактировать формулу. Также обратите внимание, что мы не вводили адреса ячеек в формулу вручную. Вместо этого мы просто выделяли ячейки, адреса которых нужно подставить в формулу. Тем не менее ручной ввод адресов тоже допускается.

Итак, мы создали формулу, высчитывающую стоимость первого товара. Аналогичную формулу нужно добавить и в остальные ячейки столбца D. Но делать это вышеописанным методом нецелесообразно. В нашем примере используется таблица с несколькими строками, но на практике таких строк может быть несколько сотен. Поэтому нам нужно скопировать уже созданную формулу в остальные ячейки столбца D. Делается это просто.

1. Выделите ячейку D2, то есть ячейку, в которой содержится формула.
2. Нажмите кнопку Копировать в группе Буфер обмена на вкладке Главная (или нажмите сочетание клавиш Ctrl+C). По периметру ячейки появится пунктирная рамка и содержимое ячейки (именно формула, а не возвращенный ей результат), будет помещено в буфер обмена.
3. Выделите ячейки D3:D9, то есть ячейки, в которые нужно добавить формулу.
4. Нажмите кнопку Вставить в группе Буфер обмена на вкладке Главная (или сочетание клавиш Ctrl+V). Формула будет вставлена во все выделенные ячейки, и в них мгновенно отобразится результат вычисления (рис. 5.39).

Виды ссылок

Теперь рассмотрим одну особенность, которая позволяет тиражировать формулу сразу в несколько ячеек. Выделите ячейку D3 и посмотрите на строку формул. Вы увидите, что в ячейке содержится формула =B3*C3. Выделите ячейку D7 и убедитесь, что в ней содержится формула =B7*C7. Как так получилось, если мы копировали в буфер формулу =B2*C2?

Дело в том, что Excel распознает смещение формулы в другую ячейку и автоматически применяет это смещение ко всем переменным в формуле. Таким образом, программа считает, что, если вы копируете формулу из второй строки (и в формуле участвуют переменные из второй строки) в третью строку, значит, и к переменным в формуле нужно применить аналогичное смещение. То есть адреса ячеек меняются, например, C2 на C3, C4, C5 и т. д. Это свойство позволяет копировать ранее созданную формулу в сотни ячеек одновременно, не заботясь о корректировке переменных. Ссылки, которые автоматически корректируются при копировании формулы в другие ячейки, называются относительными.

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

Предположим, что стоимость товара нужно еще разделить на курс валюты, который указан в единственной отдельно расположенной ячейке E2. Если мы создадим формулу вида =(B2*C2)/E2, то при копировании формулы в третью строку она будет преобразована в =(B3*C3)/E3, что приведет к неверному результату вычисления, поскольку курс валюты указан только в ячейке E2 и нигде больше. Поэтому в формуле =(B2*C2)/E2 нужно заменить относительный адрес ячейки E2 на абсолютный. В абсолютном адресе перед заголовком столбца и номером строки вводится знак $. То есть, чтобы добавить в формулу абсолютный адрес ячейки E2, нужно ввести $E$2, чтобы формула приняла вид =(B2*C2)/$E$2. Теперь при копировании формулы в третью строку, формула будет преобразована в =(B3*C3)/$E$2. Как видите, относительные ссылки в формуле изменились в соответствии со смещением позиции формулы на листе, но ссылка на ячейку с курсом валюты осталась неизменной.

Существуют также смешанные ссылки . Это ссылки, в которых одна из координат является абсолютной, а другая — относительной. Пример: $E2 и E$2. В первом случае столбец в ссылке остается неизменным при любых обстоятельствах, в то время как номер строки может меняться при смещении формулы. Во втором случае, наоборот, строка ссылки закреплена, в то время как столбец в адресе ячейки может меняться. Знак $ для добавления в формулу абсолютной ссылки можно не вводить вручную. При добавлении в формулу ссылки методом выделения соответствующей ячейки, нажмите после выделения ячейки клавишу F4. Каждое нажатие клавиши будет последовательно менять ссылку на абсолютную, смешанную и относительную.

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

Любая математическая формула в ячейке создается достаточно просто. Вы вводите формулу точно так же, как писали бы ее на бумаге, только вместо переменных подставляете адреса ячеек, в которых они находятся. Предположим, нам нужно создать формулу вида D=1,25*A/(В+С)*2.

Разберем эту формулу. D — это результат вычисления формулы. Этот результат будет выводиться в ячейке, в которой расположена формула. То есть в электронной версии формулы нам данная буква не нужна. 1,25 и 2 — постоянные числа в формуле, то есть константы. Соответственно, они остаются неизменными. А, В и С — переменные. Эти числа могут меняться, что повлияет на результат вычисления. В электронном виде в качестве переменных используются ячейки. Предположим, что переменная А находится в ячейке C2, B — в ячейке D2, а C — в ячейке E2. Таким образом, формула в ячейке Excel будет иметь вид =1,25*C2/(D2+E2)*2.

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

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

Для закрепления материала немного дополним начатый пример. Предположим, что все указанные канцтовары мы закупаем в определенном магазине, где у нас действует скидка. Размер скидки зависит от вида товара, и он нам известен. Нам нужно рассчитать стоимость товаров с учетом скидки. Для этого мы дополним таблицу еще двумя колонками (рис. 5.40).

В колонке Скидка указаны размеры скидки для каждого вида товаров (в процентах). В колонке Стоимость с учетом скидки нужно создать формулу, которая будет высчитывать итоговую стоимость вида товара с вычетом скидки. Формула должна иметь вид =Ст-(Ст/100)*Ск, где Ст — стоимость товара, а Ск — скидка, выраженная в процентах.

1. Выделите ячейку F2, то есть первую ячейку в колонке Стоимость с учетом скидки.
2. Введите знак = (равно).
3. Щелкните мышью по ячейке D2, чтобы подставить в формулу адрес ячейки с возвращенной стоимостью товара.
4. Введите знак «минус».
5. Введите круглую открывающую скобку.
6. Снова щелкните мышью по ячейке D2, чтобы подставить ее в формулу.
7. Введите знак деления /.
8. Введите 100.
9. Введите круглую закрывающую скобку.
10. Введите знак умножения *.
11. Щелкните мышью по ячейке F2 (первой ячейке в колонке Скидка). Адрес ячейки будет вставлен в формулу. У вас должна получиться формула =D2-(D2/100)*E2 (рис. 5.41).
12. Нажмите клавишу Enter, чтобы завершить ввод формулы (рис. 5.42).

В ячейке F2 отображается стоимость товара за вычетом скидки, указанной в ячейке E2. Обратите внимание, в формуле участвует переменная, которая сама по себе является возвращенным результатом. Мы знаем, что в ячейке D2 находится формула, возвращающая стоимость товара, и этот возвращенный результат используется в качестве переменной в формуле в ячейке F2. Нам остается размножить формулу на остальные ячейки столбца Стоимость с учетом скидки.

Источник

Что такое переменная и как правильно её объявить?

Переменная — это некий контейнер, в котором VBA хранит данные. Если подробнее, то это как коробочка, в которую Вы можете положить что-то на хранение, а затем по мере необходимости достать. Только в данном случае в переменной мы храним число, строку или иные данные, которые затем можем извлекать из неё и использовать в коде по мере необходимости.

Для чего нужна переменная? Чтобы хранить значение и применить его позже в любой момент. Например, в ячейке А1 записана сумма, а нажатием на кнопку запускается обновление отчета. После обновления отчета сумма в А1 изменится. Необходимо сверить сумму до обновления с суммой после и в зависимости от этого сделать какое-либо действие. Переменная как раз позволит запомнить значение ячейки до того, как она обновится и использовать именно это значение после обновления.

Требования к переменным:

В качестве имен переменных можно использовать символы букв и числа, но первой в имени переменной всегда должна быть буква. Не допускается использование точки, запятой, пробела и иных знаков препинания, кроме нижнего подчеркивания. Длина имени не должна превышать 254 символов. Так же нельзя использовать в качестве имен для переменных зарезервированные константы редактора VBA(например Sub, Msgbox, ubound, Date и т.п.). Так же для переменных неважен регистр букв.

Теперь рассмотрим основные декларированные в VBA типы данных, которые можно хранить в переменных:

Тип данных	Занимает байт в памяти	Пределы значений
Byte	1	Целые числа от 0 до 255
Boolean	2	True или False
Integer	2	Целые числа от (-32768) до 32767
Long	4	Целые числа от (-2147483648) до 2147483647
Single	4	От (–3.402823Е+38) до (–1.401298Е-45) и от 1.401298Е-45 до 3.402823Е+38
Double	8	От ±1.79769313486232Е+308 до ±4.94065645841247Е-324
Decimal	12	От ±79228162514264337593543950335 без десятичных знаков до ±7,9228162514264337593543950335 с 28-ю знаками после запятой
Currency	8	От (–922337203685477.5808) до 922337203685477.5807
Date	8	От 01.01.100 до 31.12.9999(не надо путать с датами в Excel — 01.01.1900 до 31.12.9999)
String	10(+длина строки)	От 0 до 65400 символов для фиксированных строк и чуть более 2 млрд. для строк переменной длины
Object	4	Любой объект
Array	Определяется кол-вом и размером элементов	—
Variant	от 16-ти	Любой из встроенных типов данных

Как видно из таблицы больше всего памяти занимает Variant . Притом это если он хранит числовые данные. Если же такая переменная будет хранить данные строкового типа(текст), то размер занимаемой памяти будет измеряться уже начиная с 22 байт + длина строки, хранящейся в переменной. Чем больше памяти занимает переменная, тем дольше она инициализируется в памяти и тем медленнее код будет выполняться. Вот поэтому и важно явно задавать тип данных, хранимых в переменной — это называется объявить переменную.

Тип данных Decimal больше не используется, поэтому объявить переменную данного типа в VBA не получится — подобная попытка приведет к синтаксической ошибке. Для работы с данными типа Decimal переменную необходимо изначально объявить как Variant или вообще без типа (например Dim a), т.к. тип данных Variant используется в VBA по умолчанию и принимает любой тип данных.

Так же переменным можно назначать и другие типы данных, которых нет в таблице выше — это типы, которые поддерживаются объектной моделью приложений, к которым «подключен» VBA. Например, если зайти в VBA из Excel, то библиотека типов объектной модели Excel подключена по умолчанию и для переменных становится доступно множество типов этой объектной модели. Многие из них знакомы всем: Workbook, Worksheet, Range, Cells, Chart и т.д. Т.е. это книги, листы, ячейки, диаграммы. Типов много, почти на каждый объект и коллекцию. Рассматривать здесь все бессмысленно. Могу лишь привести пару строк кода:

Dim rRange as Range ‘назначили переменной тип ячейка/диапазон Set rRange = Range(«A1») ‘присвоили ссылку на ячейку A1 текущего листа

Про объявление переменных подробно написано чуть ниже.
А более подробно про обращение к диапазонам из VBA можно почитать в этой статье: Как обратиться к диапазону из VBA

как объявлять переменные
На самом деле все очень просто. Это делается при помощи операторов области действия: Dim , Public , Static и оператора присвоения типа As . Самый распространенный оператор — Dim . Его и возьмем в качестве примера. Синтаксис объявления:

[оператор области действия] Имя_переменной As [тип данных]

Очень частая ошибка при объявлении переменных, совершаемая начинающими изучать VBA:

Dim MyVar1, MyVar2, MyVar3 As Integer

Вроде бы исходя из логики всем переменным присвоен тип данных Integer . Но это ошибочное суждение. Тип Integer присвоен только последней переменной, к которой он «привязан» оператором As — MyVar3. Все остальные переменные имеют тип данных Variant . Т.е. если Вы не задаете каждой переменной свой тип хранимых данных явно(т.е. не указываете для неё тип данных через As), то VBA сам присваивает для такой переменной тип данных Variant , т.к. он может хранить любой тип данных. А вот так выглядит правильное присвоение типа данных:

Dim MyVar1 As Integer, MyVar2 As Integer, MyVar3 As Integer

Это и есть объявление переменных. Т.е. сначала идет оператор области действия ( Dim , Public , Static ), сразу за ним имя переменной, затем оператор As и тип.
Но это не все. Некоторые типы переменным можно присваивать еще короче — даже без оператора As :

Dim MyVar1%, MyVar2%, MyVar3%

Всего шесть типов, которые можно объявить подобным методом:
! — Single
# — Double
$ — String
% — Integer
& — Long
@ — Currency
На что стоит обратить внимание, при объявлении переменных подобным образом: между именем переменной и знаком типа не должно быть пробелов.
Я лично в большинстве статей предпочитаю использовать первый метод, т.е. полное указание типа. Это читабельнее и понятнее. В каких-то проектах могу использовать краткое указание, в общих(разработка в команде) — полное. В своих кодах Вы вправе использовать удобный Вам метод — ошибки не будет.

Теперь разберемся с операторами области действия( Dim , Public и Static ):

• Dim — данный оператор используется для объявления переменной, значение которой будет храниться только в той процедуре, внутри которой данная переменная объявлена. Во время запуска процедуры такая переменная инициализируется в памяти и использовать её значение можно внутри только этой процедуры, а по завершению процедуры переменная выгружается из памяти(обнуляется) и данные по ней теряются. Переменную, объявленную подобным образом еще называют локальной переменной. Однако с помощью данного оператора можно объявить переменную, которая будет доступна в любой процедуре модуля. Необходимо объявить переменную вне процедуры — в области объявлений(читать как первой строкой в модуле, после строк объявлений типа — Option Explicit ). Тогда значение переменной будет доступно в любой процедуре лишь того модуля, в котором данная переменная была объявлена. Такие переменные называются переменными уровня модуля. Также для использования переменных во всех процедурах и функциях одного конкретного модуля можно использовать оператор Private . Но он в данном случае ничем не отличается от Dim , а пишется длиннее 🙂 Плюс, Private нельзя использовать внутри процедуры или функции(только в области объявлений), что еще больше сужает её применимость. По сути чаще этот оператор применяется к функциям и процедурам(об этом см.ниже)
• Static — данный оператор используется для объявления переменной, значение которой предполагается использовать внутри конкретной процедуры, но не теряя значения данной переменной по завершении процедуры. Переменные данного типа обычно используют в качестве накопительных счетчиков. Такая переменная инициализируется в памяти при первом запуске процедуры, в которой она объявлена. По завершении процедуры данные по переменной не выгружаются из памяти, но однако они не доступны в других процедурах. Как только Вы запустите процедуру с этой переменной еще раз — данные по такой переменной будут доступны в том виде, в котором были до завершения процедуры. Выгружается из памяти такая переменная только после закрытия проекта(книги с кодом).
• Public — данный оператор используется для объявления переменной, значение которой будет доступно в любой процедуре проекта(в обычных модулях, модулях класса, модулях форм, модулях листов и книг). Переменная, объявленная подобным образом, должна быть объявлена вне процедуры — в области объявлений. Такая переменная загружается в память во время загрузки проекта(при открытии книги) и хранит значение до выгрузки проекта(закрытия книги). Использовать её можно в любом модуле и любой процедуре проекта. Важно: объявлять подобным образом переменную необходимо строго в стандартном модуле. Такие переменные называются переменными уровня проекта. В простонародье такие переменные еще называют глобальными(возможно из-за того, что раньше подобные переменные объявлялись при помощи оператора Global, который в настоящее время устарел и не используется).
  Для большего понимания того, где и как объявлять переменные уровня проекта два небольших примера.
  Неправильное объявление

Option Explicit Sub main() Public MyVariable As String MyVariable = «Глобальная переменная» ‘показываем текущее значение переменной MsgBox MyVariable ‘пробуем изменить значение переменной Call sub_main ‘показываем измененное значение переменной MsgBox MyVariable End Sub ‘доп.процедура изменения значения переменной Sub ChangeMyVariable() MyVariable = «Изменили её значение» End Sub

переменные не будут видны во всех модулях всех процедур и функций проекта, потому что:
1. Оператор Public недопустим внутри процедуры(между Sub и End Sub), поэтому VBA при попытке выполнения такой процедуры обязательно выдаст ошибку — Invalid Attribut in Sub or Function.
2. Даже если Public заменить на Dim — это уже будет переменная уровня процедуры и для других процедур будет недоступна.
3. Т.к. объявление неверное — вторая процедура( ChangeMyVariable ) ничего не знает о переменной MyVariable и естественно, не сможет изменить именно её.
Правильное объявление

‘выше глобальных переменных и констант могут быть только декларации: Option Explicit ‘принудительное объявление переменных Option Base 1 ‘нижняя граница объявляемых массивов начинается с 1 Option Compare Text ‘сравнение текста без учета регистра ‘глобальная переменная — первой строкой, выше всех процедур Public MyVariable As String ‘далее процедуры и функции Sub main() MyVariable = «Глобальная переменная» ‘показываем текущее значение переменной MsgBox MyVariable, vbInformation, «www.excel-vba.ru» ‘пробуем изменить значение переменной Call ChangeMyVariable ‘показываем измененное значение переменной MsgBox MyVariable, vbInformation, «www.excel-vba.ru» End Sub ‘доп.процедура изменения значения переменной Sub ChangeMyVariable() MyVariable = «Изменили её значение» End Sub

Если при этом вместо Public записать Dim , то эта переменная будет доступна из всех функций и процедур того модуля, в котором записана, но недоступна для функций и процедур других модулей.
Переменные уровня проекта невозможно объявить внутри модулей классов( ClassModule , ЭтаКнига(ThisWorkbook) , модулей листов , модулей форм(UserForm) — подробнее про типы модулей: Что такое модуль? Какие бывают модули?)
Операторы области действия так же могут применяться и к процедурам. Для процедур доступен еще один оператор области действия — Private . Объявленная подобным образом процедура доступна только из того модуля, в котором записана и такая процедура не видна в диалоговом окне вызова макросов( Alt + F8 )

‘процедура записана в Module1 ‘эта процедура будет доступна для вызова исключительно из процедур в этом же модуле ‘но не будет доступна при вызове из других модулей Private Sub PrivateMain() MsgBox «Процедура может быть вызвана только из модуля, в котором записана», vbInformation, «www.excel-vba.ru» End Sub ‘другая процедура, записанная в этом же модуле Sub CallPrivate() Call PrivateMain End Sub

‘эта процедура записана в другом модуле — Module2 ‘при попытке вызова этой процедурой получим ошибку ‘ Sub or Function not defined ‘ потому что процедура PrivateMain объявлена только для Module1 Sub CallPrivate_FromModule1() Call PrivateMain End Sub

При этом, если из Excel нажать сочетание клавиш Alt + F8 , то в окне будут доступны только CallPrivate_FromModule1 и CallPrivate. Процедура PrivateMain будет недоступна.

Как правильно назвать переменную:

«Что самое сложное в работе программиста? — выдумывать имена переменным.» 🙂 А ведь придумать имя переменной тоже не так-то просто. Можно, конечно, давать им имена типа: a, d, f, x, y и т.д.(я сам иногда так делаю, но либо в простых кодах, либо для специального запутывания кода). Но стоит задуматься: а как Вы с ними будете управляться в большом коде? Код строк на 10 еще потерпит такие имена, а вот более крупные проекты — не советовал бы я в них оперировать такими переменными. Вы сами запутаетесь какая переменная как объявлена и какой тип данных может хранить и что за значение ей присвоено. Поэтому лучше всего давать переменным осмысленные имена и следовать соглашению об именовании переменных. Что за соглашение? Все очень просто: перед основным названием переменной ставится префикс, указывающий на тип данных, который мы предполагаем хранить в данной переменной. Про имеющиеся типы данных я уже рассказал выше. А ниже приведена примерная таблица соответствий префиксов типам данных:

Префикс	Тип хранимых данных
b	Boolean
bt	Byte
i	Integer
l	Long
s	Single
d	Double
c	Currency
dt	Date
str	String
obj	Object
v	Variant

Лично я немного для себя её переделал, т.к. некоторые обозначения мне кажутся скудными. Например Double я обозначаю как dbl, а Single как sgl. Это мне кажется более наглядным.

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

DefBool B Sub test() Dim bCheck End Sub

Автоматически переменной bCheck будет присвоен тип Boolean, т.к. она начинается с буквы b — регистр здесь не имеет значения(впрочем как в VBA в целом). Оператор Def задается в области объявления. Можно задать не одну букву, а целый диапазон букв:

DefBool B-C Sub test() Dim bCheck, cCheck End Sub

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

DefBool B DefStr S Sub test() Dim bCheck, sCheck End Sub

Ниже приведен полный перечень операторов типов и данные, которые задает каждый из них:
DefBool — Задает тип Boolean
DefByte — Задает тип Byte
DefCur — Задает тип Currency
DefDate — Задает тип Date
DefDbl — Задает тип Double
DefInt — Задает тип Integer
DefLng — Задает тип Long
DefObj — Задает тип Object
DefSng — Задает тип Single
DefStr — Задает тип String
DefVar — Задает тип Variant
По умолчанию в VBA применена инструкция DefVar для всех букв(иначе говоря для всех переменных, которым не назначен тип данных явно через оператор As).

Ну и немаловажный момент это непосредственно осмысленное имя переменной. Имя переменной должно примерно отражать то, что в ней будет храниться. Например, Вы создаете отчет и Вам надо объявить две переменные: одна имя листа, другая имя книги. Можно было сделать так: str1, str2. Коротко, здорово. Но если подумать — и как можно понять, какая из этих переменных что хранит? Никак. Надо просматривать код и вспоминать, какой переменной какое значение было присвоено. Не совсем удобно, правда? А если бы Вы задали имена так: strBookName, strSheetName, то вроде как более понятно, что мы в них будем хранить. Это удобно не только вам самим при работе с кодом, но и другим людям, которые, возможно в будущем будут пользоваться Вашим кодом. Им будет удобнее читать код, если он будет оформлен грамотно, а переменные названы осмысленно. И не стоит экономить на длине имени — имя должно быть понятным. Без фанатизма, конечно :-). Хоть VBA и позволяет нам создавать переменные длиной до 254 символов, но читать такую переменную так же неудобно, как и с одним символом. Но здесь уже все зависит от Ваших предпочтений и фантазии.
Небольшое дополнение: лучше привыкать давать названия переменным на латинице(т.е. английский алфавит), т.к. для VBA английский язык «родной» и лучше использовать его.

Небольшой пример использования переменных в кодах:

Sub main() ‘объявляем переменные с назначением конкретных типов ‘As String — текст ‘As Long — целое число Dim sAddress As String, sNewAddress As String, sShName As String Dim lRow As Long Dim rRange as Range ‘назначили переменной тип ячейка/диапазон ‘присвоили переменной rRange ссылку на текущую выделенную ячейку Set rRange = Selection ‘меняем выделение — выделяем ячейку D9 Range(«D9»).Select ‘назначаем переменной адрес выделенных ячеек sAddress = Selection.Address ‘назначаем переменной lRow значение первой строки выделенной области lRow = Selection.Row ‘показываем сообщение MsgBox «Адрес выделенной области: » & sAddress, vbInformation, «www.excel-vba.ru» MsgBox «Номер первой строки: » & lRow, vbInformation, «www.excel-vba.ru» ‘назначаем другой переменной значение адреса ячейки A1 sNewAddress = «A1» ‘выделяем ячейку, заданную переменной sNewAddres Range(sNewAddress).Select MsgBox «Адрес выделенной области: » & sNewAddress, vbInformation, «www.excel-vba.ru» ‘выделяем изначально выделенную ячейку, используя переменную rRange rRange.Select MsgBox «Адрес выделенной области: » & rRange.Address, vbInformation, «www.excel-vba.ru» ‘задаем значение переменной sShName = «excel-vba» ‘переименовываем активный лист на имя, заданное переменной ActiveSheet.Name = sShName End Sub

Просмотреть пошагово выполнение данного кода поможет статья: Отлов ошибок и отладка кода VBA
Важно! Назначение значений переменным задается при помощи знака равно(=). Однако, есть небольшой нюанс: для переменных типа Object (а так же других объектных типов(Workbook, Worksheet, Range, Cells, Chart и т.п.)) присвоение идет при помощи ключевого оператора Set :

‘присвоили переменной rRange ссылку на текущую выделенную ячейку Set rRange = Selection

это так же называется присвоением ссылки на объект. Почему именно ссылки? Все просто: при помещении в переменную непосредственно ячейки или диапазона( Set var = Range(«A1») или Set rRange = Selection ) нет никакого запоминания самой ячейки. В переменную помещается лишь ссылка на эту ячейку(можете считать, что это как ссылка в формулах) со всеми вытекающими: такое назначение не запоминает свойства ячейки до или после — в переменной хранится ссылка на конкретную ячейку и доступ есть исключительно к свойствам ячейки на текущий момент. Чтобы запомнить для этой ячейки значение, цвет или даже адрес (а так же и другие свойства) до её изменения и применить запомненное даже после изменения/перемещения самой ячейки — необходимо запоминать в переменные именно свойства ячейки:

Sub main() Dim val, l_InteriorColor As Long, l_FontColor As Long Dim rRange As Range ‘назначили переменной тип ячейка/диапазон ‘присвоили переменной rRange ссылку на активную ячейку Set rRange = ActiveCell ‘запоминаем свойства ячейки val = rRange.Value ‘значение l_InteriorColor = rRange.Interior.Color ‘цвет заливки l_FontColor = rRange.Font.Color ‘цвет шрифта ‘копируем другую ячейку и вставляем на место активной ActiveSheet.Range(«D1»).Copy rRange ‘проверяем, что rRange теперь имеет совершенно другие свойста — как у D1 MsgBox «Значение rRange: » & rRange.Value & vbNewLine & _ «Цвет заливки rRange: » & rRange.Interior.Color & vbNewLine & _ «Цвет шрифта rRange: » & rRange.Font.Color & vbNewLine, vbInformation, «www.excel-vba.ru» ‘назначаем свойства из сохраненных в переменных rRange.Value = val ‘значение rRange.Interior.Color = l_InteriorColor ‘цвет заливки rRange.Font.Color = l_FontColor ‘цвет шрифта ‘проверяем, что rRange возвращены параметры до копирования MsgBox «Значение rRange: » & rRange.Value & vbNewLine & _ «Цвет заливки rRange: » & rRange.Interior.Color & vbNewLine & _ «Цвет шрифта rRange: » & rRange.Font.Color & vbNewLine, vbInformation, «www.excel-vba.ru» End Sub

Это так же распространяется на все другие объекты. Т.е. те переменные, значения которым назначаются через оператор Set.
Для других же типов Set не нужен и в переменную значение заносится без этих нюансов.

Константы
Так же есть и иной вид «переменных» — константы. Это такая же переменная, только(как следует из её названия) — она не может быть изменена во время выполнения кода, т.к. является величиной постоянной и значение её назначается только один раз — перед выполнением кода.

Const sMyConst As String = «Имя моей программы»

Константам могут быть назначены данные тех же типов, что и для переменных, за исключением типа Object, т.к. Object это всегда ссылка на объект, который как правило обладает «динамическими»(т.е. обновляющимися) свойствами. А изменение для констант недопустимо.
Для дополнительной области видимости/жизни констант используется только Public . Если область видимости не указана, то константа будет доступна только из того модуля, в котором объявлена. Здесь обращаю внимание на то, что Dim уже не используется, т.к. Dim это идентификатор только для переменных. Пару важных отличий объявления констант от объявления переменных:

• при объявлении константы необходимо обязательно указывать явно, что это константа ключевым словом Const
• сразу в момент объявления необходимо назначить константе значение: = «Имя моей программы»

Во всем остальном объявление и применение констант идентично объявлению переменных. Коротко приведу пару примеров.
Если константа объявлена внутри процедуры:

Sub TestConst() Const sMyConst As String = «Имя моей программы» MsgBox sMyConst ‘показываем сообщение с именем программы End Sub

то она не может быть использована в другой процедуре:

Sub TestConst() Const sMyConst As String = «Имя моей программы» MsgBox sMyConst ‘показываем сообщение с именем программы End Sub Sub TestConst2() MsgBox sMyConst ‘вызовет ошибку Variable not defined End Sub

Чтобы использовать одну константу во всех процедурах модуля(того, в котором она объявлена), необходимо объявить её в области объявлений:

Const sMyConst As String = «Имя моей программы» Sub TestConst() MsgBox sMyConst ‘показываем сообщение с именем программы End Sub Sub TestConst2() MsgBox sMyConst ‘уже не вызовет ошибку Variable not defined End Sub

Чтобы использовать одну константу во всех процедурах проекта(книги), необходимо объявить её как Public:

Public Const sMyConst As String = «Имя моей программы» Sub TestConst() MsgBox sMyConst ‘показываем сообщение с именем программы End Sub Sub TestConst2() MsgBox sMyConst ‘не вызовет ошибку Variable not defined, даже если процедура в другом модуле End Sub

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

Статья помогла? Поделись ссылкой с друзьями!

Источник