Boa tarde a todos. Tenho essa função em meu userform. Ela identifica a linha e a coluna, mas não insere os dados no cruzamento entre elas. O trecho em destaque informa um erro de que "o método range do objeto worksheet falhou". Estou iniciando no VBA e gostaria de receber ajuda que explique e se possível solucione o erro. Grato
nomelin = UserForm1.Vendedor.Value
linha = Application.WorksheetFunction.VLookup(nomelin, Sheets("Resumo_Vendedores").Range("B11:C112"), 1, False)
coluna = Plan2.Range("x1")
valor = UserForm1.valor.Value
Plan2.Range(coluna & linha)= Plan2.Range(coluna & linha) + CDbl(valor)
Plan2.Range(coluna & linha).Select
/meio confuso sua explicação. Pode dispor um modelo/exemplo de suaplanilha?
Então vamos por etapa
Qual o retorno esperado/recebido em -->coluna = Plan2.Range("x1") ???
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
deve usar o match
Application.WorksheetFunction.Match
e não vlookup
Application.WorksheetFunction.VLookup
retornando assim o numero da linha
Se ajudei clique em agradecer