Notifications
Clear all

Como buscar dados de uma planilha em outra com Find?

4 Posts
2 Usuários
0 Reactions
794 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde a todos!

Estou precisando de ajuda para encontrar dados de uma planilha em outra planilha usando o método Find.
Tentei usá-lo mas está dando erro de execução 91 ("A variável do objeto ou a variável do bloco With não foi definida).

Sheets("CONSOLIDA").Select
Sheets("CONSOLIDA").Activate

Cells.Find(What:=Sheets("JUNTADA").Range("A2").Value, After:=Sheets("CONSOLIDA").Range("B2"), LookIn:=xlValues, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False).Activate

Quero encontrar o valor que está na célula A2 da planilha "JUNTADA" na planilha CONSOLIDA.
Porém, preciso procurar apenas na linha 2 e a partir da celula B2.

Desde já agradeço.
Silvio Felinto

 
Postado : 13/10/2015 1:49 pm
(@basole)
Posts: 487
Reputable Member
 

Tente usar o "With ..."

With Sheets("CONSOLIDA")
.Activate
.Cells.find(What:=Sheets("JUNTADA").Range("A2").Value, After:=Sheets("CONSOLIDA").Range("B2"), LookIn:=xlValues, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False).Activate
End With
 
Postado : 13/10/2015 2:31 pm
(@basole)
Posts: 487
Reputable Member
 

Para procurar em um intervalo:
* Altere o intervalo de coluna que deseja em -> .Range("B2:Z2")

With Sheets("CONSOLIDA")
.Activate
.Range("B2:Z2").find(What:=Sheets("JUNTADA").Range("A2").Value, After:=Sheets("CONSOLIDA").Range("B2"), LookIn:=xlValues, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False).Activate
End With
 
Postado : 13/10/2015 2:41 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde Basole!

Legal suas dicas de uso do método Find.

Estou enviando anexo um exemplo do que eu preciso que me ajude.

Quero fazer uma tabela resumo das últimas providência tomadas em cada processo.
Tentei usar a maior hora de entrada como chave primária, mas não avancei.

Se puder dar uma olhada, agradeço muito.

Silvio Felinto

 
Postado : 14/10/2015 9:38 am