Consegui deixar o resultado exatamente igual ao que você mandou. O código utiliza a coluna K das duas planilhas. Caso você queira usar a coluna K ...

Este vídeo explica: Este outro vídeo também explica. Troque o ZERO por 1 para correspondência aproximada: linha-da-data-mais-pr...

Anexo  Filtro-Condominio3.xlsm

Anexos: filtro-condominio.xlsm  filtro-condominio2.xlsm

Sub TESTE()For Each Workbook In WorkbooksIf Workbook.Name = "Pasta2.xlsx" ThenMsgBox "Pasta2 já está aberto."Exit SubEnd IfNext WorkbookMsgBox "Pasta2...

Este vídeo demonstra:

Anexos adicionar-e-remover-itens-em-listbox-depois-gravar-na-planilha.xlsm mover-itens-na-listbox.xlsm

Exemplo anexo. compras-no-cartao-de-credito.xlsm Este vídeo explica:

Este vídeo apresenta uma situação semelhante:

Anexo  ListView-com-filtro-em-checkboxes.xlsm

Muito Obrigado.

Sim.

Public Function ExtrairCNPJ(t As String) As StringDim texto As StringDim i As IntegerDim j As IntegerExtrairCNPJ = ""For i = 1 To Len(t)If Mid(t, i, 1...