Filtro Avanzado, copiar y pegar de un libro a otro.

[eduar5]

Hola buena tarde,

Nuevamente haciendo una consulta, con un poco de dificultad logré hacer una macro que ejecuta un filtro avanzado.

Su función es usar como criterio el valor ingresado en la celda “F2” del libro “Destino” , luego filtra desde éste libro la información que se encuentra en la columna “I” llamada “COTIZACION/IVA” del segundo libro llamado “Origen”, una vez filtrada la información la copia al libro “Destino”.

Dos cosas me faltan y no consigo hacerlas.

La primera es que al momento de pegar en el libro “Destino” los datos filtrados lo haga después de la última ceda con valor que se encuentra en la columna “F”. Tengo la idea de que se hace con este código:

ul = Range("F" & Rows.Count).End(xlUp).Row

pero no se donde colocarlo.

Lo segúndo, en lugar de copiar y pegar los valores que cumplen con el criterio y que se encuentran en el rango “A8:AH100”, hacerlo únicamente con ciertas columnas, por ejemplo: las columnas desde la “D” a la ”F”, de la “H” a la “L”, de la “R” a la “S”. En el archivo adjunto he marcado con rojo las columnas que no necesito copiar.

Por su ayuda muy agradecido.

Saludos.

Destino.rar

Origen.rar