Macro si el valor de columna E menor que 2 copie el el contenido de columna A en otra hoja
hola gente necesito su ayuda
tengo una hoja con productos, en la columna E tengo el stock y quiero que cuando ejecute la macro busque todos los valores de E menores a 2 y me copie el contenido de "A" (código producto) y de esa manera saber lo que tengo que reponer.
intente con formulas "SI" pero me quedan muchos espacios en blanco
gracias
1 Respuesta
Respuesta de Luis Mondelo
1
Te mando mi solución con esta macro:
En mi ejemplo tengo los datos en la hoja1 y cuando ejecutamos la macro nos copia los códigos de productos en la hoja2
Sub proceso()
'por luismondelo
Sheets("hoja1").Select
For Each celda In Range("e1:e" & Range("e65000").End(xlUp).Row)
If celda.Value < 2 Then
celda.Offset(0, -4).Copy
Sheets("hoja2").Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues
End If
Next
End Subrecuerda finalizar
