Abel Trujillo

Abel Trujillo

 Perú @abeltrujillo desde - visto
Preguntar

Actividad pública reciente

Ha valorado "Excelente" la respuesta

Crear una secuencia de distinción , Ejm Terraza A ,Terraza A , Terraza A Y que al final quede Terraza A,Terraza B,Terraza C .

respondió: Te anexo la macro actualizada Sub CargarDatos() 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False Set l1 = ThisWorkbook Set h1 = l1.ActiveSheet h1.Cells.Clear tit = Array("LISTA DE MATERIALES / SPOOL A_PART...
Ha valorado "Excelente" la respuesta

2° PARTE DE Como ordenar datos con una macros en la cual están separados en distintos excel´s

respondió: Te anexo la segunda parte para ordenar Sub CargarDatos() 'Por.Dante Amor Application.ScreenUpdating = False Application.DisplayAlerts = False Set l1 = ThisWorkbook Set h1 = l1.ActiveSheet h1.Cells.Clear tit = Array("LISTA DE MATERIALES / SPOOLA_PART...
Ha valorado "Excelente" la respuesta

Como ordenar datos con una macros en la cual están separados en distintos excel´s

respondió: Envíame un correo nuevo, en el asunto escribe tu nombre de usuario.
Ha preguntado en el tema en y en 1 temas más

Modificación de una macros, Que en ves de unir en hojas diferentes consolide une debajo de otra

Amigo Dante te envié a tu correo una macros, necesito que me ayude a modificarlo que en ves que una en un excel en diferentes hojas, que lo unas a nivel de consolidación uno debajo de otro todos los documentos .
Sin respuestas
Ha valorado "Excelente" la respuesta

Macros que en una columna te indique el nombre del excel del cual se extrajo.

respondió: H o l a: Tienes pendiente valorar esta respuesta: Macros que al encontrar la palabra "Isotype" dentro de la columna "A" Se añadan 2 filas encima de esta . Al final de mi respuesta hay 2 opciones para valorar: "Votar" y "Excelente", si todavía tienes...
Ha valorado "Excelente" la respuesta

Macros que al encontrar la palabra "Isotype" dentro de la columna "A" Se añadan 2 filas encima de esta .

respondió: H o l a: Te anexo la macro Sub AgregarFilas() 'Por.Dante Amor For i = Range("A" & Rows.Count).End(xlUp).Row To 1 Step -1 If Cells(i, "A") = "Isotype" Then Rows(i & ":" & i + 1).Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove End If Next...
Ha empezado a seguir a