Compartir a través de

Macro para quitar duplicados

Anónimas
2020-12-15T19:09:57+00:00

Hola, tengo una macro que la hice grabando macros que consiste en la eliminación de filas duplicadas utilizando Datos-Quitar Duplicados

El código es :

    Range("Tabla1[#All]").Select

    ActiveSheet.Range("Tabla1[#Todo]").RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, _

        6), Header:=xlYes

Cuando intento correr la macro de da error 1004 en tiempo de ejecucion - error definido por la aplicacion o el objeto.

Me podrán ayudar con esto?

Gracias

Microsoft 365 y Office | Excel | Para la casa | Windows

Pregunta bloqueada. Esta pregunta se migró desde la Comunidad de Soporte técnico de Microsoft. Puede votar si es útil, pero no puede agregar comentarios o respuestas ni seguir la pregunta.

0 comentarios

2 respuestas

Ordenar por: Muy útil
Muy útil Más reciente Más antiguo
  1. Anónimas
    2020-12-15T20:22:30+00:00

    Hola Juan Carlos, prueba así:

      Range("Tabla1").Select

    Selection.RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, 6), Header:=xlYes

    3 personas han encontrado útil esta respuesta.
    0 comentarios
  2. Anónimas
    2020-12-15T20:23:38+00:00

    Hola, tengo una macro que la hice grabando macros que consiste en la eliminación de filas duplicadas utilizando Datos-Quitar Duplicados

    El código es :

        Range("Tabla1[#All]").Select

        ActiveSheet.Range("Tabla1[#Todo]").RemoveDuplicates Columns:=Array(1, 2, 3, 4, 5, _

            6), Header:=xlYes

    Cuando intento correr la macro de da error 1004 en tiempo de ejecucion - error definido por la aplicacion o el objeto.

    Me podrán ayudar con esto?

    Gracias

    Perdón, me acabo de dar cuenta que la macro grabo "Todo" en lugar de "All"

    Cambiando Todo por All se arreglo, pero fue un tema del Basic que grabo en los dos idiomas.

    Gracias por leerme

    JC

    0 comentarios