Переменные и их объявление

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

Объявление численных и строковых переменных

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

Dim <имя переменной> As <тип данных>, <имя переменной> As <тип данных>, ... ,

Примеры объявления переменных:

Dim ProductNumber As Long, Product_Name As String

Dim I As Long, aPicture

Последний оператор объявляет переменную aPicture типа Variant.

Пример описания переменных:

Sub Макрос1()

Dim ProductNumber As Long

ProductNumber = Sheets("Лист1").Range("C5").Value

ProductNumber = ProductNumber + 1

Sheets("Лист1").Range("A5").Value = ProductNumber

End Sub

Объявление переменных массива

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

Примеры объявления массивов:

Dim Sales (4 to 8) As Currency

Оператор создает массив с именем Sales, содержащий данные типа Currency. Этот оператор задает как нижний, так и верхний предел индекса (по умолчанию индекс начинается с "0"). Таким образом, массив содержит пять элементов: Sales (4), Sales (5), Sales (6), Sales (7), Sales (8).

Dim theCoords (3, 1 to 4) As Single

Здесь создается двумерный массив чисел с плавающей точкой названный theCoords. Поскольку это объявление содержит два индексных диапазона, массив является двумерным. Диапазон первого индекса от 0 до 3, второго - от 1 до 4. Задание элементов двумерного массива требует указания двух индексов:

theCoords (0,1) theCoords (0,2) theCoords (0,3) theCoords (0,4)

theCoords (1,1) theCoords (1.2) theCoords (1.3) theCoords (1.4)

theCoords (2.1) theCoords (2.2) theCoords (2.3) theCoords (2.4)

Можно задавать массивы и большей размерности, хотя трудно вообразить, что будет представлять собой массив с размерностью больше 3.

Чтобы сделать переменную доступной всем процедурам во всех модулях, она объявляется на уровне модуля, использовав вместо Dim ключевое слово Public.

Объявление и присваивание объектных переменных

Объектные переменные объявляются также, как и любые другие. Чтобы присвоить значение объектной переменной используется следующая конструкция: ключевое слово Set , имя переменной, знак равенства и формула, определяющая значение объекта. Например, приведенная ниже процедура создает объектную переменную, присваивает ей объект Rang, ссылающийся на ячейку В5, и затем использует эту объектную переменную для присваивания значения ячейке:

Sub ObjVar ()

Dim Х As Object

Set Х = ActivSheet.Range (“B5”)

( Или Set Х = Range (“B1:B10)”) }

X.Value = 10

End Sub