Notifications
Clear all

Erro no objeto worksheet

3 Posts
3 Usuários
0 Reactions
1,155 Visualizações
(@rafa-bueno)
Posts: 0
New Member
Topic starter
 

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

 
Postado : 13/05/2015 8:38 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

/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") ???

 
Postado : 13/05/2015 1:40 pm
(@mykemeris)
Posts: 8
Active Member
 

deve usar o match
Application.WorksheetFunction.Match
e não vlookup
Application.WorksheetFunction.VLookup

retornando assim o numero da linha

 
Postado : 15/05/2015 8:43 am