Da uma pesquisada sobre filtro avançado, acho que é o que você precisa.

Veja se os modelos disponibilizados no tópico http://www.planilhando.com.br/forum/viewtopic.php?t=239&p=65815 (proc varios) não lhe auxilia.

Olá Gustavo..

Não consegui usar essa ferramenta para fazer essa questão.

Att;

Boa tarde!!

Grave uma Macro com filtro avançado!!

Att

Melhor seria com um modelo, e não imagem, mas o básico seria :

Primeiro apague o texto em A2 e em de B1 escreva "Código" porque este é o rótulo da coluna que será filtrada, e depois rode a rotina abaixo :

Sub filtrar_dados()
    
    Range("A4:C12").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "B1:B2"), CopyToRange:=Range("H4:J4"), Unique:=False

End Sub

Para deixa-la automática, é só colocar no Evento Change da aba, e lógicamente, ajustar os ranges.

[]s