Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

338 Parte V: Juntando Tudo
Observe que as quatro taxas de comissão são declaradas como constantes,
ao invés de código difícil. Isso facilita muito modificar a função
se as taxas de comissão mudarem.
Depois de definir essa função em um módulo VBA, você pode usá-la em
uma fórmula de planilha. Entrar com a fórmula a seguir em uma célula
produz um resultado de 3.000. A quantia de 25000 qualifica para uma
taxa de comissão de 12 por cento:
=Commission(25000)
A Figura 20-1 mostra uma planilha que usa a função Commission em
fórmulas na coluna C.
Figura 20-1:
Usando a
função
Commission
em uma
planilha.
Uma função com dois argumentos
O seguinte exemplo se baseia no anterior. Imagine que o gerente de
vendas implemente uma nova política para recompensar funcionários
antigos: o total da comissão paga aumenta em 1% por cada ano que o
vendedor está na empresa.
Eu modifiquei a função personalizada Commission (definida na seção
anterior) para que ela tome dois argumentos, sendo que ambos são
argumentos exigidos. Chame esta nova função de Commission2:
Function Commission2(Sales, Years)
‘ Calcula a comissão de vendas baseada nos anos de
serviço
Const Tier1 As Double = 0.08
Const Tier2 As Double = 0.105
Const Tier3 As Double = 0.12
Const Tier4 As Double = 0.14