Лабораторная работа: Пользовательские функции рабочего листа Visual Basic

Case Is <= 19999

Оплата = Продажи * 0.1

Case Is <= 39999

Оплата = Продажи * 0.12

Case Else

Оплата = Продажи * 0.14

End Select

If Ставка = 0 Then

Комиссионные2 = 0.75 * Оплата

Else

Комиссионные2 = Оплата

End If

End Function

1 Здесь и далее, если не указана денежная единица, то имеются в виду некие условные единицы.