Фун-я должна возвращать 5% от суммы комм предлож в том случае, если сумма сделки больше 1 милл руб и клиент постоянный.

Добрый вечер!
В файле с реестром сделок создайте пользовательскую функцию с двумя аргументами — статусом клиента и суммой коммерческого предложения. Функция должна возвращать 5% от суммы коммерческого предложения в том случае, если сумма сделки больше 1 миллиона рублей и клиент постоянный.
Данный код вычитает 0.5 число,а не процент...К сожалению не могу сделать условие, что клиент постоянный и чтобы вычитал именно процент. а не 0.5 число. Кто может подправить код. пожалуйста помогите. Заранее спасибо!
Код

Function Vozvrat(amount As Double) As Double
Select Case amount

Case Is > 1000000
Vozvrat = amount - 0.5

Case Is < 1000000
Vozvrat = 0

End Select
End Function