Problemas con copiado y pegado especial

[mrocf]

Hola! Pablus.
Suponiendo que hayas definido el arreglo de un modo parecido a lo que sigue:

Código:

Dim cantidad As Variant
cantidad = Array("e7", "e8")

deberías modificar tu línea de código del siguiente modo:

Código:

[E16].Copy Destination:=Sheets(" INGRESO DE PEDIDOS ").Range(cantidad(i))

Saludos, Cacho.