Excel Formula Maior em VBA

deejaywesley · 17 de fevereiro

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 · 18 de fevereiro

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 · 19 de fevereiro

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!