Preguntas esperando respuesta
Actividad pública reciente
Ha valorado "Excelente" la respuesta
Pregunta para Dante Amor, ¿Eliminar duplicados, con condición?
Prueba con la siguiente macro Sub Macro1() 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False Set h1 = ActiveSheet Set h2 = Sheets.Add h1.Select h1.Range("A1").Select Selection.AutoFilter u = h1.Range("A" &...
Ha valorado "Excelente" la respuesta
Para Dante Amor ¿Eliminar duplicados de base de datos si se repite más de 3 veces dejar solo 2 veces ese registro?
Te anexo la macro, cambia en la macro "A" por la columna en donde tienes tus datos. Para la ejecución de la macro necesito una columna disponible, en la macro puse la columna "Z" pero si la columna "Z" la tienes ocupada, entonces cambia "Z" por una...
Ha preguntado en el tema en
Educación primaria
¿Cómo eliminar repetidos, si estos se repiten más de 3 veces, me deje solo 2 registros?
, espero que me puedan ayudar mi problema es el siguiente: Tengo una base de datos en la cual los registros se repiten mas de 3 veces, necesito que borre los demas registros y solamente me deje 2 de esos registros, siempre y cuando se repita mas de 3...
Ha valorado "Excelente" la respuesta
¿Cómo enumerar una lista con elementos repetidos en Excel?
Prueba con la siguiente macro Sub orden3() 'Por.Dante Amor c = "A" 'ant = Cells(2, c) cod = Cells(2, "B") n = 1 u = Range("A" & Rows.Count).End(xlUp).Row Range("C2:C" & u).ClearContents n24 = False For i = 2 To u If ant <> Cells(i, c) Then n = 1 Else...
Ha empezado a seguir el tema Microsoft Excel
Ha empezado a seguir a 
Dante Amor
Dante Amor
Ha valorado "Excelente" la respuesta
¿Cómo ordenar valores repetidos? Gracias
Si tus datos están como se muestra en la siguiente imagen. Ejecuta la siguiente macro para colocar el número de orden. Sub orden() 'Por.Dante Amor c = "A" ant = Cells(2, c) n = 1 u = Range("A" & Rows.Count).End(xlUp).Row Range("C2:C" &...