Si hallas algún error con tu código o proyecto, recuerda probar siempre en un entorno de testing antes subir el código al proyecto final.
Ejemplo 1: código vba para eliminar duplicados de una columna
Sub removeDuplicate()'removeDuplicate Macro
Columns("A:A").Select
ActiveSheet.Range("$A$1:$A$117").RemoveDuplicates Columns:=Array(1),_
Header:=xlNo
Range("A1").SelectEndSub
Ejemplo 2: código vba para eliminar duplicados de una columna
Sub dedupe_abcd()Dim icol AsLongWith Sheets("Sheet1")'<-set this worksheet reference properly!
icol = Application.Match("abcd",.Rows(1),0)With.Cells(1,1).CurrentRegion
.RemoveDuplicates Columns:=icol, Header:=xlYes
EndWithEndWithEndSub
Recuerda que puedes permitirte comentar .
¡Haz clic para puntuar esta entrada!
(Votos: 2 Promedio: 4)