fiquei na dúvida da declaração caso os valores fosse somente negativos.
''' Function Nossa_Maximo(pIntervalo as Range) as Variant Aux_retorno = 0 For Each celula in pIntervalo If celula.value > aux_Retorno Then Aux_retorno = celula.value End If Next
Nossa_Maximo = Aux_retorno End Function '''
Olá Tiago,
Não estamos bem certo de ter entendido sua dúvida, pois este trecho que você copiou refere-se ao IF para comparar e gravar os valores do intervalo ... vamos lá
o trecho Faz uma verificação, para gravar sempre o maior número:
“Percorra cada célula do intervalo e se encontrar um número maior que “Aux_retorno” então grave este valor”
sendo que
iniciamos determinando o valor de “zero” para a variável Aux_retorno, considerando que não haveria nenhum preço negativo (inferior a zero) na lista.
Então numa outra hipótese, de trabalhar numa outra lista com números negativos não haveria problema aqui, pois a ideia é identificar o maior número (para o caso da nossamaximo).
Veja se isso resolve sua dúvida,
Caso surjam novas dúvidas, fique à vontade para falar com a gente aqui pelo fórum.
Abraços,
Equipe do Prof. Sabino