Excel Formula Maior em VBA

[deejaywesley]

Boa Noite Amigos(as)

 

{=MAIOR(((saldos_estoque!D2:D36000)=Reposição!B3)*(saldos_estoque!A2:A36000);1)}

Estou tentando fazer esta formula, em vba, mas esta dando erro...

Range("A3").Value = Application.WorksheetFunction.Large(((Sheets("saldos_estoque").[D2:D36000]) = Range("B3").Value) * (Sheets("saldos_estoque").[A2:A36000]), 1)

da erro de "tipos incompativeis"

 

alguém sabe como fazer? 

[OreiaG]

Olá, @deejaywesley.

 

O erro de "tipos incompatíveis" ocorre porque parece que nem WorksheetFunction e nem Application trabalham bem com sintaxes matriciais.

 

Com sintaxes não matriciais elas funcionam, conforme os dois exemplos abaixo.

[F3] = Application.Large(Sheets("saldos_estoque").Range("A2:A9"), 1)
[G3] = WorksheetFunction.Large(Sheets("saldos_estoque").Range("A2:A9"), 1)

 

A alternativa no seu caso é utilizar Evaluate, que trabalha bem com matriciais e aceita variáveis nos parâmetros, se necessário.

 [A3] = Evaluate("LARGE(((saldos_estoque!D2:D36000)=Reposição!B3)*(saldos_estoque!A2:A36000),1)")
	ou com o atalho [...] que faz a função de Evaluate.
 [B3] = [LARGE(((saldos_estoque!D2:D36000)=Reposição!B3)*(saldos_estoque!A2:A36000),1)]

 

 

 

[deejaywesley]

Boa Note @OreiaG

 

5 horas atrás, OreiaG disse:

A alternativa no seu caso é utilizar Evaluate, que trabalha bem com matriciais e aceita variáveis nos parâmetros, se necessário.

Muito obrigado pela explicação, ja estou anotando aqui mais esta 

Funcionou certinho aqui!

forte abraço! 

[OreiaG]

34 minutos atrás, deejaywesley disse:

Funcionou certinho aqui!

forte abraço! 

 

Que bom que resolveu e obrigado por nos informar.

Abraço.