Copiar Hojas con Macros Excel. Parte 1

Hasta este punto hemos visto varios ejercicios para el uso de los Métodos Adicionar (Add), Seleccionar (Select) y Mover (Move) que son aplicables al Objeto Worksheet. Para las siguientes entregas vamos a poner en práctica el Método Copiar con algunas de sus variantes más utilizadas.

Método Copy: Con la aplicación de este método, es posible realizar el copiado de la toda la hoja en el libro u otros libros de Excel.

Para el siguiente ejemplo, lo ideal es contar con un libro de Excel que contenga 3 hojas y la idea es copiar la Hoja1 después de la Hoja2:

Lo primero es ingresar al editor de Visual Basic, puede ser con la combinación de teclas Alt + F11 y desde el explorador de proyectos, es necesario dar doble clic sobre la hoja donde se requiere crear la macro que para nuestro ejercicio se ubicará en la Hoja1:

Ingresamos el siguiente código:

Sub CopiarHoja()

Worksheets("Hoja1").Copy After:=Worksheets("Hoja2")

End Sub

Queda de la siguiente manera en el editor VBA:

Veamos lo que significan cada una de las líneas:

  1. La primera línea Sub CopiarHoja(), indica el inicio de la macro.
  2. En la segunda línea estamos utilizando del Objeto Worksheets de la Hoja1, el Método Copy y el parámetro After para mover la hoja después de la Hoja2
  3. La última línea marca el fin (End) de la Macro o Subrutina (Sub).

Para ejecutar la macro, lo ideal es insertar una autoforma en la Hoja1 y luego asignar la macro que acabamos de crear (clic derecho sobre la Autoforma y seleccionar la opción Asignar macro:

Finalmente seleccionar la macro que se acaba de crear:

Y al dar clic sobre el la autoforma, la macro copiará la Hoja1 después de la Hoja2.

Descargar archivo.

Contenido relacionado:
Compartirlo
Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.


Déjenos su opinión

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo con respeto, sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.