2021-12-01 17:00:38
Функции с двумя аргументами
Данный пример основан на предыдущем. Предположим, менеджер по продажам ввел новые правила: общая сумма комиссионных увеличивается на 1% за каждый год работы продавца.
Function Комиссионные(Продажи, Стаж)
'Вычисление размера комиссионных с учетом выслуги лет
Ставка1 = 0.08
Ставка2 = 0.10
Ставка3 = 0.12
Ставка4 = 0.14
Select Case Продажи
Case 0 To 9999.99
Комиссионные = Продажи * Ставка1
Case 10000 To 19999.99
Комиссионные = Продажи * Ставка2
Case 20000 To 39999.99
Комиссионные = Продажи * Ставка3
Case Is >= 40000
Комиссионные = Продажи * Ставка4
End Select
Комиссионные = Комиссионные + (Комиссионные * Стаж / 100)
End Function
Как видите, модификация очень проста: к функции Комиссионные добавлен второй аргумент Стаж (в операторе Function) и перед выходом из функции добавлен дополнительный оператор для расчета окончательного значения суммы комиссионных с учетом стажа работника.
Ниже приведен пример того, как написать формулу с использованием данной функции (при этом предполагается, что величина объема продаж находится в ячейке А2, а стаж сотрудника - в ячейке В2).
=Комиссионные(А2,В2)
#VBA
603 views14:00