Macro que copie de una hoja a otra con una condición y elimine filas que se copian

Tengo una macro sacada de la Web que copia de hoja1 a hoja2 con la condición "Si" adaptada alo que necesito, esto lo hace perfectamente, necesito que después de copiar a la hoja2 elimine de la hoja1 las filas que se han copiado a la hoja2, sin dejar filas en blanco en la hoja1 al eliminar dichas filas

1 Respuesta

Respuesta
3

Tendría que ver la macro para ver cómo está copiando y cómo se podría eliminar las filas.

O envíame tu archivo para revisarlo. Recuerda poner en el asunto tu nombre de usuario

Te envío el archivo con la macro para que veas como copia ,etc

saludos Juan (segusuario)

Te anexo la macro actualizada

Sub CopiarFilas()
'Por.Dante Amor
    Set h1 = Sheets("Hoja1")
    Set h2 = Sheets("Hoja2")
    For i = h1.Range("A" & Rows.Count).End(xlUp).Row To 5 Step -1
        If UCase(h1.Cells(i, "A")) = "SI" Then
            h1.Rows(i).Copy h2.Rows(h2.Range("A" & Rows.Count).End(xlUp).Row + 1)
            h1.Rows(i).Delete
        End If
    Next
    MsgBox "Teminado"
End Sub

Saludos.Dante Amor

Recuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Macro que actualiza datos en función de una condición

Para Dante Amor. Quisiera que esta macro que te transcribo fuera operativa no solo bajo celdas con un valor dado sino también con valor que derive de una fórmula (ahora solo es operativa cuando el valor de la celda no es resultado de fórmula). Sub...
1 respuesta

Copiar registros de una hoja en la siguiente hoja

Haber si me puedo explicar, necesito una macro que copie de la hoja1 a la hoja2 de 50 en 50 registros, pero dejando un espacio entre cada copia por ejemplo que lea los primeros 50 registros de la hoja1 y que los copie a la hoja2, que deje un espacio...
1 respuesta

Macro para crear hojas con un nombre y copiar datos en ellas.

Necesito hacer una macro que copie datos e inserte hojas nuevas, apartir de la "Hoja1". En la "Hoja1" tengo una tabla de 14 columnas y 100 filas, La copia se debe de realizar según datos de la columna "A". Al ejecutar la macro, se buscan datos en la...
1 respuesta

Como eliminar duplicados si se cumple una condición

Necesito crear una macro donde se pueda eliminar los duplicados si se cumple una condición, me explico tengo 5 columnas Nombre, Vehículo, Evento, Fecha, Hora, En evento tengo dos opciones normal y exceso de velocidad, lo que quiero es quitar todos...
2 respuestas

Macro para buscar, encontrar y copiar datos especificos

Tengo un libro con 2 hojas, hoja1 y hoja2, en la hoja2 tengo una base de datos de la siguiente manera: (Ej. Juan, tengo muchos mas con diferentes nombres e información diferente pero en el mismo orden) A B C D E 1 JUAN 2 1/1/14 INGRESOS 1 1ER SEM...
1 respuesta

Macro para Exportar columnas condicionadas VBA Excel

Expertos reciban un saludo, ingreso por lo siguiente, quisiera hacer una macro que al presionar un botón el evalué una columna si los datos de esa columna cumplen con la condición entonces debe exportar a otra hoja de excel, la columna 3, 7 y 9....
2 respuestas

Macro que busque duplicados y los elimine

Necesito una macro que compare 2 columnas de 2 dos hojas diferentes y elimine la fila cuando encuentre duplicados en la segunda hoja . Las filas eliminadas serán solo de la segunda hoja.
1 respuesta

Macro que me busque un valor y lo copie a otra hoja

Requiero de su sabiduría Necesito crear una macro que evalué si una celda (HOJA 1, Celda U3) cumple una condición. Si la condición se cumple (="Eisai613"), que copie el contenido de una segunda celda de la misma fila (HOJA 1, Celda B3) y lo pegue en...
2 respuestas

Macro para eliminar y copiar filas en otra hoja

Aquí, haciendo incursiones con las macros pero esto es muy complejo. Agradecería mucho su ayuda. Tengo 2 hojas de excel en un libro. En la hoja 1 tengo miles de filas y datos repartidos en 10 columnas. En la hoja 2 cientos de filas y datos repartidos...
1 respuesta

VBA Excel 2003 - Modificar datos de un libro con datos de otro libro

Tengo un libro “Presu puesto Anual” con 2 hojas: Hoja1 con las siguientes columnas : provincia, ciudad, sector, código-gasto, enero, febrero, marzo,…, diciembre. En esta hoja se encuentran los datos de los gastos que se presupuestaron originalmente....
2 respuestas