Ciao Ciacillo1, questo e' il codice vba che ho preparato per te, fa un controllo sulle prime 2000 celle della colonna B e se trova un valore che e' gia' presente nella lista lo cancella. al termine appare un messaggio che ti avvisa che il processo si e' concluso.
Il tempo di esecuzione del ciclo si attesta tra i 2/3 secondi.
Questo codice va incollato in un modulo del vba di excel e fatto partire secondo le tue necessita'.
Spero possa esserti di aiuto, in caso contrario posta le modifiche da apportare.
ciao.
- Codice: Seleziona tutto
Sub elimina()
For x = 1 To 2000
10
Cells(x, 2).Select
If ActiveCell.Row > 2000 Then GoTo 30
If ActiveCell = "" Then
x = x + 1
GoTo 10
End If
ValoreDaCercare = ActiveCell
RigaDaNonEliminare = ActiveCell.Row
For y = 2000 To 1 Step -1
20
Cells(y, 2).Select
If ActiveCell = "" Then
y = y - 1
GoTo 20
End If
If ActiveCell = ValoreDaCercare And ActiveCell.Row <> RigaDaNonEliminare Then ActiveCell.ClearContents
Next y
Next x
30
Cells(1, 2).Select
MsgBox "Processo concluso"
End Sub