Cómo quitar duplicados en Excel Visual Basic 07

Ser capaz de eliminar rápidamente los datos duplicados en la hoja de cálculo Excel se puede ahorrar mucho tiempo si usted trabaja con hojas de cálculo grandes . No gaste su tiempo en busca de la duplicación de datos de las columnas manualmente . En Visual Basic para Aplicaciones ( VBA) , puede utilizar el método de " RemoveDuplicates " que elimina los valores duplicados de un rango de valores. Este método es útil cuando se necesita para eliminar la duplicación de datos en muchas hojas de cálculo de varias columnas. Instrucciones
1

Tipo " 1 " en la A1, " 2 " en la A2, " 2 ", en A3, "3" A4 ", 4" de A5, y " 4 " en la A6 . Haga clic en la pestaña de " desarrolladores" y haga clic en "Visual Basic " para iniciar el editor de Visual Basic . Haga clic en el menú " Insertar" y haga clic en " módulos" para añadir un nuevo módulo
2

Crear un nuevo procedimiento sub escribiendo el siguiente código: .

RemoveDuplicates Private Sub ()
Página 3

Establecer el rango de la columna en la que desea eliminar los duplicados como A1 a A6

Range (" A1 : A6 ") . . Seleccionar

4

Añada la siguiente línea de código para eliminar duplicados de A1 a A6 :

ActiveSheet.Range ( "$ a $ 1 : $ A $ 6"). RemoveDuplicates Columnas: = 1 , Header : = xlNo
5

Muestra un cuadro de mensaje cuando se han eliminado los duplicados.

MsgBox " duplicados en A1 se han eliminado ! "
6

End sub procedimiento mediante la adición de "End sub ​​" en el final. Pulse la tecla "F5 " para ejecutar el procedimiento .