copiar un rango a otra hoja con Destination:

[elforex]

Cordial Saludo,
Estoy utilizando la siguiente instruccion para copiar de una hoja a otra.

LRFNE = Worksheets("DB_Emc").Range("A" & Rows.Count).End(xlUp).Row
Range("G5").Copy...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[rogman]

Tienes que hacerlo en dos etapas:

<i>
</i>Range("G5").Copy
Worksheets("DB_Emc").Range("A" & LRFNE + 1).PasteSpecial (xlPasteValues)

 

[elforex]

Muchas gracias, por tu respuesta pero asi como me dices no funciono.

Pero ya lo resolvi asi:

Dim HojaOrigen As Worksheet, HojaDestino As Worksheet

Set HojaOrigen = Sheets("Cotizacion")
Set...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí