Dante Amor

H o l a: Cambia la macro RevisarArchivo por lo siguiente, deberás poner todo en un módulo, observa como al principio de todas las macros va la declaración de la variable rutas Dim rutas As New Collection ' Function encuentraarch(nuevo) 'Por.Dante...

H o l a: Te anexo la macro actualizada para ordenar del 0 al 9999 Sub Repetidos() 'Por.Dante Amor col = "IZ" ' Application.ScreenUpdating = False c = Columns(col).Column Range(Cells(1, c), Cells(1, c + 2)).EntireColumn.ClearContents For Each n In...

H o l a: Puedes aclarar los siguientes puntos: 3) Busca esa palabra en la fila 1 que esta en la celda E1 Según tu imagen la palabra "ENE" está en la celda K1, ¿es correcto? 4) Busca la intersección osea celda K5 cuyo valor es de 4.6 La intersección...

H o l a: El parámetro xlWhole es para que coincida con toda la celda, tienes que poner xlPart para que te busque el texto dentro de las celdas: Set b = Sheets("Personal").Range("z2:z500").Find(ComboBox1, LookAt:=xlPart) Sal u dos

H o l a: Disculpa, no había visto la pregunta, te anexo una macro para hacerlo con todas las filas de la columna A de la hoja1, el resultado quedará en la hoja2 Sub SepararRut() 'Por.Dante Amor ' Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") With...

H o l a: Para realizar la macro me podrías comentar lo siguiente: El correo se va a enviar por outlookDe dónde se tomará el correo del destinatarioQué lleva el asunto del correoQué lleva el cuerpo del correoExplica con imágenes y ejemplos reales...

H o l a: Te anexo la macro actualizada para ordenar, recuerda copiar correctamente la macro y cambiar "IZ" por tu columna. Sub Repetidos() 'Por.Dante Amor col = "IZ" ' Application.ScreenUpdating = False c = Columns(col).Column Range(Cells(1, c),...

H o l a: Te anexo la macro, recuerda cambiar "IZ" por la columna en la que deseas el resultado. Sub Repetidos() 'Por.Dante Amor col = "IZ" ' Application.ScreenUpdating = False c = Columns(col).Column Range(Cells(1, c), Cells(1, c +...

H o l a: La condición 1 que tienes actualmente está sobre el rango1, ¿la nueva condición que vas a poner es sobre el rango1 o sobre el rango2? Podrías poner un ejemplo con una imagen de cómo están tus datos y qué condiciones vas a aplicar. Sal u dos

Puedes poner una imagen de cómo están tus datos en la hoja y otra imagen del resultado que esperas.