UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

Nenita


buenas tardes  
les envio cordiales saludos a todos los que lean mi solicitud.....


Envio un archivo con una macro que  funciona ala perfección  pero con pocos datos no se  1000  hasta 2000 

pero 

 
mi problema es q  tengo un archivo con mas de 2 millones de registros 
 llevo dos dias  en la hoja 1 de 5  y cada hoja tiene 700 mil registros 

espero alguien  pueda ayudarme con esto  de verdad mil gracias
Archivos
1000datos.xlsm
No tienes los permisos para descargar los archivos.
(25 KB)

Igtelo


Hola Nenita.

Tanto esta pregunta como la anterior es obvio que te tarde muuuuuucho, los bucles no son lo indicado para esto, te imaginas 2 mio. de datos fiu!!

Ahora bien, de una vez te aclaro que no te podemos estar hace y hace macros sino sabes de ellas, es necesario que aprendas y ya con ello más adelante entonces si te apoyo.

Si manejaras las herramientas de Excel verías que hay una forma rapidísima para hacerlo y si quieres macro la otra herramienta es el grabador de macros...

Saludos
Ignacio Téllez

Nenita


Igtelo  Considero que este  foro es abierto  y a nadie  se le obliga  a hacer lo q solicitamos aqui.... 

considero  tambien q siempre hay gente  con buen corazón  que hace las cosas sin reclamo
y realmente me gustaria  aprender  mas de macros pero mis posibilidades me limitan y por el momento estoy solo estudiando  de lo poco q encuentro en tutoriales gratis ......

 y bueno mira  ya en otro foro me ayudaron  sin reclamos si decir que me estan hace y hace macros .....

y  comparto la respuesta 

seguramente a alguien como yo sin experiencia  le servira .
..
VA CODIGO PARA  EJECUTARLO  HASTA 900 000 REGISTROS


Código:
Sub repetidos()

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
ActiveSheet.DisplayPageBreaks = False

ActiveSheet.Range("A1:AF" & Range("D" & Rows.Count).End(xlUp).Row).RemoveDuplicates Columns:=4, Header:=xlYes

     Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.EnableEvents = True
ActiveSheet.DisplayPageBreaks = True
Application.CutCopyMode = False
      
    MsgBox ("listo  ")
End Sub

Visor


Gracias Nenita por compartir ese código me es útil había hecho algo parecido pero allí encontré lo que me faltaba.

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.