Nyyu

Podem fechar, resolvi com procv Obrigado pela atenção

Alguém poderia me ajudar?

consegui chegar nesta VB atraves de um post daqui mesmo, porém a mesma nao esta pintando nenhuma linha ou celula

Sub duplicatas()

Application.ScreenUpdating = False

Dim dado1, dado3 As String

Dim X, linplan1, linplan3 As Integer
linplan1 = Sheets("Garagem").Cells(Rows.Count, 1).End(xlUp).Row
linplan3 = Sheets("Faltantes").Cells(Rows.Count, 1).End(xlUp).Row

For i = 2 To linplan1
dado1 = Sheets("Garagem").Cells(i, "C") & _
Sheets("Garagem").Cells(i, "P")
X = i
    For j = 3 To linplan3
    dado3 = Sheets("Faltantes").Cells(j, "C") & _
    Sheets("Faltantes").Cells(j, "P")
        If dado1 = dado3 Then
  
        Sheets("Faltantes").Cells(j, 3).EntireRow.Interior.ColorIndex = 5
      
        End If
    Next j
Next i

Application.ScreenUpdating = True

End Sub

Bom Dia @Patropi

Conforme o pedido segue em anexo a planilha, na planilha1 (Estoque) existe 5 itens na qual tenho em estoque, na Planilha2 (Faltantes), existem 20 itens, sendo que 5 deles eu ja tenho, eu marquei somente 2 itens na planilha Faltantes, minha ideia é, conforme eu dou "entrada" na planilha Estoque, quando eu apertar um botão, que ja esta la na planilha Faltantes, ela se atualize, faca uma varredura nas colunas e mude a cor da linha que for igual a da planilha Estoque como esta la o exemplo das 2 ja marcadas.

CATALOGO.xlsx

Ola, Boa Tarde.

Estou criando um excel de estoque onde tenho 2 planilhas, as 2 planilhas sao iguais sendo elas Estoque e Faltantes, contando 300 linhas e 14 colunas sendo elas da linha 3 a 302 e coluna da c ate a p, gostaria de fazer comparação de todas as linhas entre as 2 planilhas, o resuldado da comparação é apresentado na planilha Faltantes somente trocando a cor da linha que for igual ao da outra planilha.

Agradeço desde já

hey man, de uma olhada nos seus processos, o meu pc tb faz isso, quando abro  o gerenciador de tarefas meu HD esta rodando a 98%