1
clic en la pestaña "Sheet1 " y tipo " de datos en Hoja1 " en A1. Haga clic en " datos en Hoja2 " tipo " Hoja2 " y en A1.
2 Haga clic en la pestaña de " desarrolladores" , haga clic en "Visual Basic ", y haga clic en el menú " Insertar". Haga clic en " módulos" para insertar un nuevo módulo de código .
3
Crear un nuevo procedimiento sub .
CopyDataBetweenSheets Private Sub ( )
4
Agregue el código siguiente para seleccionar la Hoja1 y copiar los datos en A1: . .
Hojas
( "Sheet1 ") seleccione
Range (" A1" ) Seleccione
Selection.Copy
5
Agregue el código siguiente para seleccionar Hoja2 y pegar los datos copiados de Sheet1 : .
Hojas
( " Hoja2 ") seleccione
Range ( . "A2 ") Seleccione
ActiveSheet.Paste
6
Seleccione los datos en la celda A1 y copiarlo con el código siguiente :
Range (" A1 ") Seleccione
Selection.Copy
7
pegar los datos copiados de Hoja2 añadiendo el siguiente código: .
Hojas
( ." Sheet1 " ) Seleccione
Range (" A2" ) . Seleccione
ActiveSheet.Paste
8
Fin del procedimiento mediante la adición de " End Sub ". Pulse la tecla "F5 " para ejecutar el procedimiento sub .