Eliminar registros repetidos con macro
Ya he encontrado el problema Luis, tenia una fila vacía en medio y se interrumpía el proceso. Gracias de todas formas.
Iban
1 Respuesta
Respuesta de Luis Mondelo
1
Te mando la nueva macro que arregla el problema de una celda en blanco
Sub ejemplo()
'por luismondelo
range("c65000").end(xlup).offset(1,0).value ="final"
Range("c2").Select
Do While ActiveCell.Value <> "final"
contarsi = Application.WorksheetFunction.CountIf(Columns(3), ActiveCell)
If contarsi > 1 Then
ActiveCell.EntireRow.Delete
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
activecell.clearcontents
End Subno olvides finalizar las consultas que tienes abiertas conmigo
