Respuesta
en
Microsoft Excel
a
¿Cómo copiar filas que cumplan una condición de una hoja a otra?
Para otros números debes modificar la cantidad que aparece marcada con rojo If h1.Cells(i, col) = 1 Then