tanimon, 08/06/2018 19.17:
ciao,
non ho guardatoil file,
ma dopo avere applicato il filtro dove sono i duplicati,
prova questa da mettere in un modulo standard e a cui abbinare un pulsante
Dim priga As Long
Dim uriga As Long
uriga = Range("A" & Rows.Count).End(xlUp).Row
priga = Range("A2:A" & Rows.Count).SpecialCells(xlCellTypeVisible).Row
Range(Cells(priga + 1, 1), Cells(uriga, 1)).EntireRow.Delete
Range("A2").Activate
Range("A2").AutoFilter rimane solo 1 riga filtrata
ciao
Frank
Grazie, ho provato.
Ma non riesco ad avere quel che mi serve.
Forse guardando il file si capisce meglio.
Le date in azzurro senza formule dovrebbero essere filtrate e vedersi solo le righe che le contengono.
Poi io cancellerei tutte le righe senza formule dopo averle controllate.
Magari non si può fare, non so.