Лекция 9(5) Программирование на VBA

«Разные мелочи»

Перенос строки кода в программе на новую строку

<Пробел> + <Знак подчеркивания>

MsgBox “ha=“ & str(ha) & chr(13) & “hb=“ & str(hb) _ & chr(13) &“hc=“ & str (hc)

Перенос строки кода

Конкатенация строк- это объединение нескольких строк в одну. Для объединения используется символ «амперсанд» & или символ «сложения» +.

При объединении строк вторая строка добавляется в конец первой.

Операции VBA

Математические –выполняются над числами, их результатом

являются числа. Стандартный набор операций: + , -, *, / , \ (целочисленное деление), ^ (возведение в степень).

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

Логические – применяются логическими выражениями и их результатом являются логические значения. Стандартный набор: and (логическое умножение), or (логическое сложение), not (логическое отрицание)

Приоритет: функции, действия в скобках, ^, * и /, \ (деление нацело), + и - , > < = , Not, And, Or.

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

Использование функций упрощает программирование.

Функции преобразования типов-

преобразуют переменные одного типа в другой тип

Форматирование чисел

представляет число в заданной форме или как дату, время, денежное значение

Пользовательский формат – позволяет настроить вид отображаемых

значений так, как желает пользователь.

Format (Переменная или Выражение, Формат )

Специальная функция форматирования чисел

FormatNumber (Переменная или выражение, Количество знаков после запятой)

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

•Присваивает значение выражения переменной, константе или

свойству. Всегда включает знак равенства (=)

Имя переменной = Выражение

Оператор предписывает выполнить выражение и присвоить его результат переменной. Например

х=2

х= х+2

•Используется для присваивания переменной ссылки на объект. Применяется ключевое слово Set . В примерепеременной r присваивается ссылка на ячейку А1 и через эту переменную в ячейку А1 вводится значение.

Dim r As Range

Set r = Range (“A1”) r. Value = 3

В общем случае инструкция Set имеет такой синтаксис

Set Имя переменной = Выражение

Оператор With

Позволяет не повторять многократно имя объекта. Структурирует текст программы.

Пример. Изменить свойства ячейки А1

Без использования With

Range(“A1”).Value =3 Range(“A1”) . Font . Italic = True

Установлено значение А1, равной 3 и шрифт – «курсив»

С использованием With

With Range(“A1”)

.Value=3

.Font . Italic=True End With

Оператор With

Примеризменение формата ячейки

Range(“A1”).Value =3

Range(“A1”) . Font . Italic = True Range(“A1”). Font . Size = 12 Range(“A1”). Font.ColorIndex =3

Установлено значение А1, равной 3, шрифт – «курсив», высота шрифта 12, цвет красный

With Range(“A1”)

.Value=3

With . Font

. Italic=True

. Size = 12

. ColorIndex =3

End With End With

Операторы управления:

перехода и выбора (GoTo, If, Select), повтора (For, For Each, Do Loop, While)

Оператор условного перехода – задает выполнение

определенных групп инструкций в зависимости от значения логического выражения

1 вариант записи If условие Then

выполняются операторы, если условие истина Else

выполняются операторы, если условие ложно end if

2 вариант записи

if условие Then операторы Else операторы

Если оператор набирается в одну строку , то end if не ставится. Ветвь Else является необязательной.

ПРИМЕР: Вычислить Скидку=5%, которая применима только к

Суммам больше 1000, в противном случае Скидка=0.

Скидка = 0.05

Else

Скидка =0

end if

2 вариант записи

If Сумма>1000 Then Скидка = 0.05 Else Скидка =0