Седьмая статья, как просчитать премию в зависимости от выполненного плана, предыдущие варианты можно найти по ссылкам:
Как посчитать премию в экселе используя функции ИНДЕКС и ПОИСКПОЗ
Как посчитать премию в экселе используя функции ВПР
Как посчитать премию в экселе используя функции ПОИСКПОЗ и СМЕЩ
Как посчитать премию в экселе используя функцию ЕСЛИ
Как посчитать премию в экселе используя макросы (Select Case)
Как посчитать премию в эксель используя функции ВЫБОР и ПОИСКПОЗ
Исходные данные снова совпадают с предыдущем вариантом.
Первый шаг. Для запуска макроса, необходимо перейти во вкладку «Вид» и нажать на иконку «Макросы».
Второй шаг. В меню макрос нажимаем на строку «Расчет премии» и происходит расчет премии.
Третий шаг. В результате получаем расчет премии.
Макрос
Sub Расчет_Премии()
' Создаем массив для хранения ставок в зависимости вы выполненного плана
Set MKR = Worksheets("МАКРОС")
For i = 4 To 6
If MKR.Cells(i, 3) < 0.6 Then MKR.Cells(i, 4) = 0 Else If MKR.Cells(i, 3) < 0.8 Then MKR.Cells(i, 4) = MKR.Cells(i, 2) * 0.5 Else If MKR.Cells(i, 3) < 0.9 Then MKR.Cells(i, 4) = MKR.Cells(i, 2) * 1 Else If MKR.Cells(i, 3) < 1 Then MKR.Cells(i, 4) = MKR.Cells(i, 2) * 1.25 Else MKR.Cells(i, 4) = MKR.Cells(i, 2) * 1.5
Next i
End Sub