Combinar Funciones o Hacer Macro en Excel

Hola a todos, tengo una pregunta en cuanto a combinar funciones o hacer una macro en Excel, mi caso es que debo acumular datos en una misma hoja, pero los datos provienen de diferentes archivos; los archivos pueden contener desde 20 hasta 200 columnas con título y
desde 1 hasta 7000 filas con valores diferentes; es muy complicado acumularlos
manualmente debido a que los formatos cambian muy seguido y esto lo debo hacer
diario; quisiera poder combinar funciones en Excel o hacer una macro para que
me acomode los archivos de acuerdo al título de una columna, es decir que
busque en una hoja horizontalmente el título de la columna y que copie todos
los valores que se encuentran en esa columna justo debajo del título y que los
pegue en otra hoja donde están todos los posibles títulos. Espero haber sido específico.

De antemano gracias por su valioso apoyo.

1 Respuesta

Respuesta
1

Fijate en www.programarexcel.blogspot.com ahí hay procedimientos que leen los datos de una columna de a cuerdo a criterios y copian en otra, echale un vistazo y luego me comentas.

Estimado si pudiste resolver lo que estabas haciendo cierra la pregunta

Estimado muchas gracias por tu respuesta probé lo que me compartiste y aún no logro llegar a lo que necesito; lo que sucede es que no se programación; tendrás de casualidad algún otro dato para apoyarme??

Gracias de antemano.

Fijate en www.programarexcel.blogspot.com en la parte de servicios.

Lo que tu necesitas es algo muy específico es decir no necesitas un par de sentencias sino toda una automatización de tu libro yo te puedo dar aquí una mano, pero si no sabes algo de programación en VBA será difícil que implementes lo que te voy diciendo, es necesario más datos para lo que tu quieres hacer es decir donde se encuentran los datos, rango, de hoja quieres copiar, donde se encuentran los datos específicamente, criterios para extraer los datos, etc.

No obstante puedes leer algo sobre macros de excel así tienes algo de idea, yo en este foro te puedo dar una mano en lo que estés trabajo o no te salga, por ej para buscar datos con criterios puedes hacer un bucle como

Dim col, col1, colb, contá As Integer

Dim dato, c As String

col = 1

colb = 1

col1 = 1

contá = 0

While Sheets("Hoja1").Cells(1, col) <> Empty And contá = 0 dato = "ID"

Set b = Sheets("Hoja1").Range("A1:XFD1").Find(dato, LookIn:=xlValues, Lookat:=xlWhole)

If Not b Is Nothing Then

Sheets("Hoja1").Select Columns(col).Select Selection.Copy

Sheets("Hoja2").Select Cells(1, col1).Select

Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False

Application.CutCopyMode = False

col1 = col1 + 1

col = col + 1

contá = 1

End If

colb = colb + 1

Wend

Este código anterior hace un bucle recorriendo un rango de celdas dependiendo si están vacías o no en base a ello busca un dato, luego se agrega un criterio en caso de ser verdadero copia los datos en la hoja seleccionada, y así hasta terminar todo el rango donde tiene celdas. Con este tipo de códigos lograrás hacer lo que quieres, te invito a que descargues ejemplos de www.programarexcel.blogspot.com y veas su funcionamiento.

Estimado muchas Gracias! tu respuesta me fue de utilidad y como no se VBA opte por grabar una macro de lo que neceitaba y ahora solo acomodo los datos y ejecuto la macro para que copie y pegue.

Muchas gracias y saludos,

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas