Muito Obrigado Mauro.

Estou usando o seguinte algorítimo de VBA Sub MASTER() Worksheets("Relatorio").Range("A2:G50000").ClearContents ultimaL...

Acontece que ela não está filtrando, está apenas copiando os dados de uma planilha e transferindo para outra.

Uma das Planilhas da Pasta de Trabalho.