Macro que copie La cantidad indicada
Tengo este Excel que me ayuda a imprimir las etiquetas de mis productos la forma en la que la uso es la siguiente en la fila A2 “no forzosamente tiene que ser A2 puede ser cualquier fila que este vacía” pongo los datos y al oprimir el botón copiar me copia en las filas vacías las veces que yo oprima el botón La macro que estoy usando es esta.
Sub copiar()
'opcional: verifica que se esté seleccionando rango en A:C
Sheets("PRODUCTOS").Select
ActiveSheet.Unprotect Password:="contra"
If Selection.Row = 1 Or Selection.Column > 3 Or Selection.Count > 3 Then Exit Sub
'ubica la siguiente fila libre y pega la selección
filx = Range("A2").CurrentRegion.Rows.Count + 1
Range("A" & ActiveCell.Row & ":C" & ActiveCell.Row).Copy Destination:=Range("A" & filx)
Sheets("PRODUCTOS").Select
ActiveSheet.Protect Password:="contra"
End Sub
Y este es el cambio que Quiero. En lugar de estar oprimiendo el botón las veces que quiero que copie, lo haga mejor con la cantidad que le ponga en E2. Supongamos que me llego mercancía y puse en el excel todos los productos que llegaron sin cantidades y ahora lo que quiero es que me copie el producto que yo seleccione las veces que yo le indique por ejemplo la fila A4, quiero copiarla 5 veces las cuales se tienen que copiar en la fila que este vacía que en este caso sería A10 y después la fila A7 la quiero copiar 10 veces y esta se tendrán que copiar en la siguiente fila vacía en este caso A15 el chiste es que me deje copiar la fila que yo seleccione las veces que yo le indique en las filas que estén vacías. Espero darme a entender. Gracias