Erro no objeto worksheet

2024 - VBA & Macros

Post Recente por mykemeris 10 anos atrás

3 Posts

3 Usuários

0 Reactions

1,170 Visualizações

RSS

Rafa Bueno

(@rafa-bueno)

Posts: 1

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

Fernando Fernandes

(@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") ???

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 13/05/2015 1:40 pm