Copiar filas enteras si la columna "M" contiene cierta coindición
Buenas! Llevo rato dando vueltas por las perguntas y no encuentro la solución.
expongo:
tengo un excel (versión 2003) con varias hojas; la que me interesa es la primera, se llama "GENERAL" y contiene varios datos de personas.
Lo que me interesaría hacer es copiar todas las filas de esta hoja que el la columna "M" (que tiene como título "parking") a la segunda hoja, que la llamo "CARTES".
Millón y medio de gracias!!
1 Respuesta
Te faltó mencionar cuál es la condición de la columna "M"
Si lo que se tiene que validar es una palabra, utiliza la siguiente macro. Cambia en la macro la palabra "algo" por la palabra que necesitas comparar.
Sub copiar()
'Por.Dante Amor
Set h1 = Sheets("General")
Set h2 = Sheets("CARTES")
For i = 2 To h1.Range("M" & Rows.Count).End(xlUp).Row
If h1.Cells(i, "M") = "algo" Then
h1.Rows(i).Copy h2.Range("A" & h2.Range("M" & Rows.Count).End(xlUp).Row + 1)
End If
Next
End SubSigue las Instrucciones para un botón y ejecutar la macro
1. Abre tu libro de Excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / Módulo
4. En el panel del lado derecho copia la macro
5. Ahora para crear un botón, puedes hacer lo siguiente:
6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
9. Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: copiar
10. Aceptar.
11. Para ejecutarla dale click a la imagen.
