Notifications
Clear all

Macro Copiar valores Iguais

5 Posts
1 Usuários
0 Reactions
1,656 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia.
Como criar uma macro que copie dados iguais de uma plan para outra?

Ex:
Plan1

Nome Valor
A1     B1
Joao  2000
maria 2014
joao  2093
jose  5689
joao  2056

Na plan2 ficaria na sequencia

A1     B1
Joao  2000
joao  2093
joao  2056

Como copiar apenas o Joao com os respectivos valores na sequencia?

No Aguardo.

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

 
Postado : 12/10/2011 9:13 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde VBA-Sistems

Eu ainda sou iniciante em VBA, mas uma maneira fácil de vc fazer isso é gravar uma macro Aplicando Filtro Avançado com o Critério: Nome: João
Depois é só classificar pelo coluna B e pronto.

Como fazer:
A Plan1 tem que ter cabeçalho igual ao que vai usar no critério, como por exemplo na célula A1 Nome e na B1 Valor.
Na Plan2 na célula D1 escreva Nome e na D2 João (É o critério)
Clique no botão gravador, que fica logo abaixo da Aba da Plan1: Se quiser de nome, senão só dar OK e realizar as seguintes tarefas:

Na Plan2 --> Com o cursor na célula A1 ---> clique na Guia Dados ---> Filtro Avançado ---> Marque a opção Copiar para outro Local --> clique no quadradinho lado direito do Intervalo da Lista para abri uma janelinha auxiliar --> vá p a Plan1 e selecione todos os dados, inclusive os cabeçalhos ---> clique no para fechar a janelinha e retornar p a janela principal do filtro avançado --> clique em Intervalos de critérios e selecione as Células D1:D2 ---> clique em copiar para: digite A1 --> Dê Ok 9 O filtro esta pronto.
Agora --> Selecione a coluna A e B até onde tiver dados --> clique Guia Dados ---> clique em Classificar ---> Marque a opção: Meus Dados comtém cabeçalhos ---> na primeira janela da esquerda escolha a opção classificar por valor--> Dê OK - clique na célula A1 para desamrcar o intervalo.
Desligue o gravador de Macro.
Guia desenvolvedor ---> Inserir --> Escolha Botão no controle de formulário--> Desenhe o botão na planillha ---> Atribua a Macro e pronto.

Para vc ver o código--> clique em ALT+F11 --> No lado esquerdo clique em Módulos --> depois em Módulo 1.

Espero ter ajudado.

Dê retorno.

Um abraço

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

 
Postado : 12/10/2011 10:59 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

VBA, os passos do Patropi são validos, é uma exelente forma de aprendermos a utilizar VBA e a opção que muitos se esquecem ou desconsideram que é o Gravador de Macros.

Aproveitando um modelo que fiz para um poutro solicitante, com uma adaptação chegamos ao que pretende, neste exemplo temos 4 maneiras de se realizar o pretendido, atraves de Filtro Avançado com resultado na mesma aba digitando-se o nome, para outra aba clicando em botão ou atraves de um formulário, e para finalizar o resultado somente com formulas.

Veja se ajuda e se dá para aproveitar em sua questão.

Qualquer duvida retorne.

[]s

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

 
Postado : 12/10/2011 11:10 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Uma outra opção sem Auto Filtro.

[]s

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

 
Postado : 12/10/2011 2:23 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Mauro.

Ficou do jeito que eu queria, obrigado mais uma vez. E não poderia de deixar de agradecer as dicas do amigo patropi.

Abraço.

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

 
Postado : 12/10/2011 4:32 pm