Ainda no início fica um pouco complicado verificar a nomenclatura que as colunas de uma planilha qualquer vão ter no código, pra que o teste da sintaxe seja verificável. Consegui uma codificação geral, mas não foi possível testar.
Ainda no início fica um pouco complicado verificar a nomenclatura que as colunas de uma planilha qualquer vão ter no código, pra que o teste da sintaxe seja verificável. Consegui uma codificação geral, mas não foi possível testar.
Eu fiz dessa maneira:
Function fnmax_ses(imax As Range, alvo As Variant, iprocura As Range) As Double
Max = 0
Row = 1
Column = iprocura.Column
For Each cell In imax
Search = iprocura(Row, Column)
If Search = alvo And cell > Max Then
Max = cell
End If
Row = Row + 1
Next
fnmax_ses = Max
End Function
A variável search mostra qual o valor está sendo procurado, talvez seja isso que você está procurando Quando fui depurar, consegui acompanhar passando o mouse por cima, ele descrevia quais valores estavam sendo obtidos