Copy and Paste en diferentes hojas con macro

Tengo el siguiente código que copia unas columnas de una hoja y pega en otra hoja, todo es en el mismo Libro.

Y me esta dando el siguiente error. ¿Alguna idea?

Gracias, Aleida

Sheets("PO").Select
Range("C:D,G:G,R:R,AD:AD,AF:AM,AU:AV").Select
Selection.Copy
Sheets("New_POTemp").Select
ActiveSheet.Paste

1 respuesta

Respuesta
2

¿A partir de cuál celda exactamente quieres pegar?

Prueba esto. Cambia "A1" por la celda inicial de pegado.

Sub test()
  Sheets("PO").Select
  Range("C:D,G:G,R:R,AD:AD,AF:AM,AU:AV").Copy
  Sheets("New_POTemp").Select
  Range("A1").Select
  ActiveSheet.Paste
End Sub

Hola Dante!

Funciono perfecto! ¿Entonces hay que seleccionar la sheet y además la celda inicial de pegado?

Muchas gracias,.. y que tengas muy buen día!

Aleida

H o l a Aleida: 
Es correcto, debes seleccionar en dónde quieres pegar, de lo contrario se realizará el pegado en la celda que se encuentra seleccionada en ese momento. Lo esencial es decirle a la macro en dónde quieres el pegado.

Encantado como siempre de ayudarte! G racias por comentar.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas