Tecnología

Inicio

Cómo copiar y pegar un rango a un libro de Excel VBA

Cómo copiar y pegar un rango a un libro de Excel VBA


En Excel, una gama es un grupo de celdas seleccionadas. Después se han seleccionado las células, que pueden generar fórmulas relacionadas, mostrar un conjunto de información bloqueada o ser copiado en otra hoja de cálculo. Puede utilizar VBA (Visual Basic para Aplicaciones) para copiar y pegar un rango de un libro de Excel a otro. No es difícil de hacer una vez que conozca el código correcto. Una vez que tenga el código, decidir sobre qué módulo desea insertar el código y lo que dará lugar a la ejecución de código.

Instrucciones

1 Cree dos libros diferentes en Excel. El primer libro de trabajo contiene el rango que desea copiar mientras que el otro es donde se pega el rango dentro. Mantenga el libro que actualmente tiene el campo abierto. El otro libro no tiene por qué ser abierta para completar el resto de los pasos.

2 Abra el Editor de Visual Basic. Haga clic en "Herramientas> Macros> Editor de Visual Basic" en Excel 2003 o anterior. En Excel 2007, tendrá que mostrar la pestaña "desarrollador" en primer lugar. Haga clic en el botón "Office" y luego "Opciones de Excel". Haga clic en la casilla junto a "Mostrar ficha Programador en la cinta" en la pestaña "General" y haga clic en "Aceptar". Haga clic en la pestaña "desarrolladores" y haga clic en "Visual Basic" para abrir el editor.

3 Haga clic en "este libro" en el panel de la izquierda para abrirlo en la ventana de código. Agregue el código siguiente a la ventana código:

Public Sub copyRange ()

Workbooks("Book1")._
Worksheet("CurrentSheet") _
Range ("A1:C10").Copy_
Destination:=
Workbooks("Book2")._
Worksheets("PasteSheet")._
Range("A1")

End Sub

Cambiar la información en el paréntesis para que coincida con los libros. "Libro 1" es el libro que se está trabajando actualmente. "CurrentSheet" es la hoja de cálculo que tiene el rango que desea copiar. "A1: C10" es el rango de celdas que desea copiar. "Libro2" es el libro que desea pegar el rango. "PasteSheet" es la hoja de cálculo que desea pegar el rango en. "A1" es la celda inicial que desea pegar el rango en.

4 Guarde y ejecute el código. Haga clic en "Herramientas> Macro> Macros" en Excel 97 a 2003. En Excel 2007, haga clic en el botón "Macros" en la pestaña "desarrollador". Véase la función "copyRange" en la lista de macros. Haga clic en él y haga clic en "Ejecutar". El código se ejecutará y copiar el rango de una hoja de cálculo y pegarlo en otro.

Consejos y advertencias

  • Puede pegar el rango en el mismo libro u hoja de trabajo que ha copiado desde. Con tan sólo introducir el libro o el nombre de hoja de cálculo del código en el que pondría el libro de destino o la hoja de cálculo.