Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
lançando informaçõe...
 
Notifications
Clear all

lançando informações

 
2024 - VBA & Macros
Post Recente por nilson1978 8 anos atrás
6 Posts
3 Usuários
0 Reactions
1,525 Visualizações
RSS
 nilson1978
(@nilson1978)
Posts: 73
Trusted Member
Topic starter
 

Boa Noite
preciso concluir um projeto, porem não estou conseguindo concluir a minha macro,
preciso fazer o lancamento dos dados da plan1 para a plan2 e montar um banco de dados, porem só lança a primeira linha
as demais não funciona.

se alguem puder me ajudar ficarei grato

 
Postado : 20/05/2017 8:37 pm
 Osvaldomp
(@osvaldomp)
Posts: 858
Prominent Member
 

Experimente:

Sub ReplicaDados()
 Sheets("prevenda").Range("A2:L" & Cells(Rows.Count, 1).End(3).Row).Copy Sheets("base").Cells(Rows.Count, 1).End(3)(2)
End Sub

Osvaldo

 
Postado : 21/05/2017 6:55 am
 nilson1978
(@nilson1978)
Posts: 73
Trusted Member
Topic starter
 

Boa Tarde
Muito obrigado
Saúde, Paz e Sucesso

 
Postado : 21/05/2017 12:34 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde Nilson

Só faltou clicar na mãozinha para agradecer ao colaborador.

[]s

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

 
Postado : 21/05/2017 12:44 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Reaberto por solicitação do autor do tópico.

[]s

Patropi - Moderador

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

 
Postado : 22/05/2017 10:03 am
 nilson1978
(@nilson1978)
Posts: 73
Trusted Member
Topic starter
 

Boa Noite
Com a ajuda do nosso amigo Osvaldomp
consegui dar uma melhorada no código, porem ainda nao esta da mameira a qual preciso para concluir o projeto
refiz o um modelo mais detalhado para ver de alguem pode me ajudar
Desde já agradeço

 
Postado : 23/05/2017 3:54 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico