Como usar xlookup em vba (com exemplos)

Você pode usar a seguinte sintaxe básica para executar um XLOOKUP usando VBA:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub

Este exemplo específico procura o valor na célula E2 no intervalo A2:A11 e encontra o valor correspondente no intervalo C2:C11 e, em seguida, atribui o resultado à célula F2 .

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: como usar XLOOKUP em VBA

Digamos que temos o seguinte conjunto de dados no Excel que contém informações sobre vários jogadores de basquete:

Digamos que queremos pesquisar no conjunto de dados o nome do time “Kings” e retornar o valor correspondente na coluna de assistências.

Podemos criar a seguinte macro para fazer isso:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "))
End Sub

Quando executamos esta macro, recebemos a seguinte saída:

A macro retorna corretamente um valor de 3 assistências para os Reis.

Se alterarmos o nome da equipe na célula E2 e executarmos a macro novamente, ela encontrará corretamente o valor auxiliar para o novo nome da equipe.

Por exemplo, digamos que mudamos o nome do time para “Warriors” e executamos a macro novamente:

A macro retorna corretamente um valor de 4 assistências para os Warriors.

Observe que você também pode adicionar um quarto argumento opcional à função Xlookup para especificar o valor que deve ser exibido se nenhuma correspondência for encontrada.

Por exemplo, você pode usar a seguinte macro para executar uma função XLOOKUP e retornar “None” se nenhuma correspondência for encontrada:

 Sub Xlookup()
    Range(" F2 ").Value = WorksheetFunction.Xlookup(Range(" E2 "), Range(" A2:A11 "), Range(" C2:C11 "), "None")
End Sub

Sinta-se à vontade para substituir “Nenhum” pelo valor que deseja exibir.

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

VBA: Como usar correspondência de índice
VBA: como usar PROCV
VBA: Como usar VLOOKUP de outra planilha