Use a propriedade WorksheetFunction em Excel VBA para acessar o PROCV função. Tudo que você precisa é de uma única linha de código.
Situação:
1. Coloque um botão de comando em sua planilha e adicione a seguinte linha de código:
Intervalo ("H3"). Valor = WorksheetFunction.VLookup (Intervalo ("H2"), Intervalo ("B3: E9"), 4, Falso)
Quando você clica no botão de comando na planilha, o Excel VBA usa a função VLOOKUP para pesquisar o salário de ID 53 e coloca o resultado na célula H3.
Observação: visite nossa página sobre a função VLOOKUP para saber mais sobre esta função do Excel.
Se a função VLOOKUP não puder encontrar uma correspondência, o Excel VBA retornará a mensagem "Não foi possível obter o Propriedade VLookup da classe WorksheetFunction "erro.
2. Por exemplo, insira o valor 28 na célula H2.
Resultado quando você clica no botão de comando na planilha:
3. Para substituir esse erro por uma mensagem amigável, atualize o código da seguinte maneira.
Em erro GoTo InvalidValue:
Intervalo ("H3"). Valor = WorksheetFunction.VLookup (Intervalo ("H2"), Intervalo ("B3: E9"), 4, Falso)
Sair do Sub
InvalidValue: Range ("H3"). Value = "Not Found"
Resultado quando você clica no botão de comando na planilha:
Observação: visite nossa página sobre tratamento de erros para saber mais sobre este tópico.