double arrow

Примеры ввода и вывода значений

Основные математические функции VBA

Операторы, используемые в выражениях

End Sub

Таблица 1

Оператор Пример использования Описание
+ a + b Сложение двух чисел
- a - b Вычитание
* a * b Умножение
/ a / b Деление
\ a \ b Целочисленное деление
Mod a Mod b Возвращается остаток от деления
^ a ^ b Возведение в степень
And выражение1 And выражение2 Логическое “И”
= выражение1 = выражение2 Оператор эквивалентности
> выражение1 > выражение2 Оператор сравнения “больше”
>= выражение1 >= выражение2 Оператор сравнения “больше или равно”
<> выражение1 <> выражение2 Оператор сравнения “не равно”
< выражение1 < выражение2 Оператор сравнения “меньше”
<= выражение1 <= выражение2 Оператор сравнения “меньше или равно”

Таблица 2

Функция Пример использования Описание Тип возвращаемого результата
Abs Abs(x) Модуль числа x Совпадает с типом числа x
Atn Atn(x) Арктангенс числа x Double
Cos Cos(x) Косинус числа x Double
Exp Exp(x) Экспоненциальная функция (в степени x) Double
Fix Fix(x) Возвращает целую часть числа x. Если x - отрицательное, то возвращаемое значение округляется в большую сторону (напр., если x=-1.5, возвращается -1). Integer
Int Int(x) Возвращает целую часть числа x. Если x - отрицательное, то возвращаемое значение округляется в меньшую сторону (напр., если x=-1.5, возвращается -2). Integer
Log Log(x) Натуральный логарифм числа x Double
Rnd Rnd или Rnd(x) Генерируется случайное число. Если аргумент не указан – генерируется число в диапазоне от 0 до 1 Single
Sgn Sgn(x) Знак числа (1 0 -1) Integer
Sin Sin(x) Синус числа x Double
Sqr Sqr(x) Квадратный корень из x Double
Tan Tan(x) Тангенс числа x Double

Дополнение к основным математическим функциям VBA:

· Logn(x) = Log(x) / Log(n)

· Для перевода x из градусов в радианы: x = x * π / 180

· IsNumeric () – встроенная функция VBA – возвращает True, если ее аргумент является числом (строка), и False – в противном случае.

· Val ()встроенная функция VBA - преобразует переданную ей строку в число.

· InputBox ()– выдает запрос на ввод значения; возвращает строковое значение.

Ввод:

· x=5.7 (оператор присваивания);

· x= Worksheets(1).Range("A1").Value(значение считывается из ячейки А1);

· x = InputBox("Enter Number: ", "Calculate Factorial") (создается окно ввода значений переменной х и указываются соответствующие комментарии).

Рис. 20. Окно ввода значений

Вывод:

· Cells(1,2).Value=5 (присваивает ячейке В1 текущего рабочего листа активной рабочей книги значение 5);

· Worksheets(1).Range("A1:B2").Value = 10 (присваивание блоку ячеек значения, равного 10);

· Range("D15").Value="Test" (присваивание ячейке текущего рабочего листа активной рабочей книги значения Test);

MsgBox (x) (создание окна сообщений, пример результата см. рис. 21).

Рис. 21. Результат выполнения оператора вывода MsgBox (x)


Сейчас читают про: