Macro pegar valor de un rango en otra hoja

Buenas noches.

Tengo este código que me copia y pega el contenido de un rango en otra hoja.

Range("H2:H" & nf).Copy _
    ThisWorkbook.Worksheets(1).Range("E10:E" & Rows.Count).End(xlUp).Offset(4)

Necesito que pegue solo los valores.

Le agregue 

.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

Pero provoca error.

Muchas gracias por su ayuda.

2 Respuestas

Respuesta
1

Así quedaría el código:

Range("H2:H" & nf). Copy
Worksheets(1).Range("E" & Rows.Count).End(xlUp).Offset(4).PasteSpecial Paste:=xlPasteValues

Revisa que después del copy no debe llevar el _

Quedo muy agradecido con ambos.

Excelente ayuda.

Dante, como siempre usted tan certero en sus respuestas y recomendaciones.

Un saludo enorme y gracias nuevamente.

Respuesta
1

Este post donde agrego ejemplos como copiar y pegar datos en otro rango, hoja o libro

http://www.programarexcel.com/2014/07/como-copiar-cortar-y-pegar-en-vba.html 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas