Ignacio Contreras

Dante Amor respondió: Visita: Cursos de Excel y Macros Por Dante Amor ----- -- Utiliza la siguiente fórmula: =CONTAR.SI.CONJUNTO(A6:A50,1,C6:C50,1) Nota: Cambia las comas ( , ) por punto y coma ( ; ) si lo utilizas como separador de argumentos. ----- -- Recomendación:...

Dante Amor respondió: Ejecuta la siguiente macro. Actualiza en la macro estos datos: Set s1 = w1.Sheets("Resumen") 'Hoja Resumen ruta = "C:\trabajo\" 'carpeta donde tienes los libros con datos sName = "Hoja1" 'Hoja de libros de datos Pon la macro en tu libro resumen,...

Dante Amor respondió: Revisa la siguiente respuesta: Tengo 18 hojas de excel y quiero unirlas en una sola hoja, todas tienen las mismas columnas pero diferentes filas, ¿cómo hago? Sigue los pasos ahí explicados, no olvides votar y valorar las respuestas.

Dante Amor respondió: Te anexo una macro para unir las hojas en la hoja "Resumen". La macro supone que tus hojas tienen un encabezado en la fila 1, que tus datos empiezan en la fila 2 y que también empiezan en la columna "A". Cambia en estas líneas de la macro, por tus...

Dante Amor respondió: Te anexo la macro Sub Guarda_Hojas() ' Application.ScreenUpdating = False Application.DisplayAlerts = False ruta = ThisWorkbook.Path & "\" Sheets(Array("Hoja3", "Hoja4", "Hoja5", "Hoja6")).Copy ActiveWorkbook.SaveAs Filename:=ruta & "hojas" &...

Dante Amor respondió: Revisa el siguiente artículo, ahí explico cómo resaltar una fila y columna https://www.gerencie.com/iluminar-la-fila-y-la-columna-donde-se-encuentra-la-celda-activa.html Revisa esta respuesta ahí explico cómo resaltar una sección. Macro para colorear...

Dante Amor respondió: Puede ser así: Private Sub Worksheet_Change(ByVal Target As Range) 'actualiza los acumuladores en la siguiente hoja ' If Not Intersect(Target, Range("K:X")) Is Nothing Then If Target.Row < 9 Then Exit Sub If Target.Count > 10 Then Exit Sub ' res =...

Abraham Valencia respondió: [Hola Yo borro todos los archivos de ejemplo así que sugiero, para poder entender/reproducir tu problema, que coloques el archivo en un "Drive" y lo compartas por aquí. Saludos] Abraham Valencia