Notifications
Clear all

Pesquisa em uma planilha buscando código em outra obedecendo

6 Posts
3 Usuários
0 Reactions
918 Visualizações
(@eduardm)
Posts: 0
New Member
Topic starter
 

Pesquisa em uma planilha buscando código em outra obedecendo algumas condições.

Olá. Estou tentando criar um código mas não estou conseguindo. Sou novo no VBA e estou usando no trabalho.

A idéia é a seguinte:

Numa planilha 1, na coluna 1, tenho 25 códigos, um em cada célula da coluna.

Tenho de fazer o seguinte:

1) - Pego este código X na célula(1,1)
2) - Chamo a planilha 2;
3) - Procuro este código na coluna 1 desta planilha 2;
4) - Achei o código?, vou para coluna 4;
5) - Na coluna 4, pesquiso por um outro código Y;
6) - Copio o código e chamo a planilha 3;
7) - Na planilha 3 verifico se o código já existe na coluna 2;
8) - Se já existir na coluna 2 eu apenas colo o código;
9) - Se não existir eu crio uma nova linha na coluna 2, colo o codigo Y e colo o código x na coluna A.
10) - Faço isso até encontrar um célula vazia na coluna 4 da planilha 2. Quando acontecer isso é porque acabaram os códigos na coluna 4 da planilha 2.
11) - Então eu volto para o passo 1) e pego o próximo código na coluna 1 da planilha 1 na célula(2,1) e repito todo o processo de 2) até o 10; Faço isso até o último código da planilha 1 na coluna 1.

Desde já agradeço a ajuda de todos.

Muito obrigado!!

 
Postado : 01/11/2016 8:07 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Por favor poste seu arquivo modelo!!

Att

 
Postado : 01/11/2016 8:11 am
(@mprudencio)
Posts: 0
New Member
 

Um exemplo pratico facilita muito o entendimento.

 
Postado : 01/11/2016 8:21 am
(@eduardm)
Posts: 0
New Member
Topic starter
 

Obrigado por terem respondido!!

Em anexo segue a planilha 1 onde está o código VBA e a planilha 2 de onde quero retirar os dados. A planilha 3 é criada dentro do código VBA e está com a tag "target_workbook".

O código está bagunçado porque eu fui tentando algumas alternativas através da leitura em livros de VBA mas que não deram certo. Como disse, estou começando agora no VBA, então tenho muito para aprender.

Obrigado.

 
Postado : 01/11/2016 8:31 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde eduardm

Seja bem-vindo ao fórum!

Como você é novato, para facilitar a tua participação no fórum, sugiro tomar conhecimento do conteúdo dos links abaixo:
viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s

 
Postado : 01/11/2016 1:01 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

A planilha 3

que você fala é um arquivo (xls, xlsm, xlsx, xlsb etc)?

porque não usa uma formula para comparar os resultados e via VBA mostrar na guia desejada?

=PROCV(A1;'[planilha 2.xls]Sheet1'!$A:$A;1;0)

Att

 
Postado : 03/11/2016 9:32 am