Вернутся на главную

Внедрение интегрированных функций в макросах


Внедрение интегрированных функций в макросах на нашем сайте

Статьи
Статьи для студентов
Статьи для учеников
Научные статьи
Образовательные статьи Статьи для учителей
Домашние задания
Домашние задания для школьников
Домашние задания с решениями Задания с решениями
Задания для студентов
Методички
Методические пособия
Методички для студентов
Методички для преподавателей
Новые учебные работы
Учебные работы
Доклады
Студенческие доклады
Научные доклады
Школьные доклады
Рефераты
Рефератывные работы
Школьные рефераты
Доклады учителей
Учебные документы
Разные образовательные материалы Разные научные материалы
Разные познавательные материалы
Шпаргалки
Шпаргалки для студентов
Шпаргалки для учеников
Другое

В макросах можно использовать и имеющиеся в Excel функции. Но при этом имеется одно ограничение:

функция должна быть в англоязычном варианте.

Например.

Пусть для отчета, рассмотренного в предыдущем разделе необходимо выбрать вариант расчета.

К примеру:

- общая сумма выручки (уже реализовано в разделе 5.4.6.1);

- средняя выручка;

- максимальная выручка;

- минимальная выручка.

Можно конечно выполнить все эти расчеты сразу.

Т.е. в ячейку D12 (рис. 5.10) ввести формулу:

=ДСРЗНАЧ(Данные_продаж;Продажи!H11;Q7:R8);

в ячейку D13 (рис. 5.10) ввести формулу:

=ДМАКС(Данные_продаж;Продажи!H11;Q7:R8);

и т.д.

Но если сделать вариант с выбором вида расчета, то интерфейс отчета может быть следующим (рис. 5.12):

Рис. 5.12. Интерфейс расчета показателей продаж за определенный период времени

Из раскрывающегося списка выбирается вид расчета и затем щелчок по кнопке «Рассчитать».

Технология создания такого интерфейса уже описана в разделах 5.4.3. Сортировка, 5.4.4. Поиск, 5.4.5. Расчет заработной платы.

Поэтому дадим только краткие комментарии:

- для выбора операции используется элемент «Поле со списком»;

- этот элемент связан со списком операций, который введен в ячейки U11:U14;

- с этим списком связана ячейка U15;

Макрос для кнопки «Рассчитать» может иметь вид:

Sub Рассчитать()

k = Range("U15")

Select Case k

Case 1

Range("F11") = "=DSUM(Данные_продаж,Продажи!H11,Q7:R8)"

Case 2

Range("F11")="=DAVERAGE(Данные_продаж,Продажи!H11,Q7:R8)"

Case 3

Range("F11") = "=DMAX(Данные_продаж,Продажи!H11,Q7:R8)"

Case 4

Range("F11") = "=DMIN(Данные_продаж,Продажи!H11,Q7:R8)"

End Select

End Sub

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

– записывается временный макрос, в котором вызывается нужная нам функция;

- получившаяся команда копируется в нужный нам макрос;

- временный макрос удаляется.





Название статьи Использование встроенных функций в макросах