Copiar datos de otro libro según criterio

Amigos una vez más necesito de su valiosa ayuda: tengo una macro que me copia datos de una hoja de otro libro, la macro funciona bien pero trae todo los datos de la hoja, lo que quiero es traer la información de acuerdo a una condición que se encuentra en la columna f "CODIGO", es esa columna existen varios tipos de códigos ej: CHS, LP, CP, PL etc... Lo que necesito es traer la información de acuerdo al código "PL",

Les adjunto la macro que tengo: desde ya les agradezco su ayuda