Copiar Hojas con Macros Excel. Parte 2

Para la segunda parte de este ejercicio donde se copia toda una hoja del libro, vamos a ver una variante donde la idea es sin tener que indicar el nombre de la hoja, como obtener el mismo resultado. La ventaja de este método es que se puede cambiar el nombre de la hoja y la macro continuará funcionando sin problema mientras que con el método visto en la entrega anterior, no será posible cambiar el nombre de la hoja si se quiere seguir utilizando la macro sin cambiarla.

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 CopiarHojasinNombres()

Worksheets(1).Copy After:=Worksheets(2)

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 CopiarHojasinNombres(), indica el inicio de la macro.
  2. En la segunda línea estamos tomando el Objeto Worksheets de la Hoja1 la cual se indica con el valor 1 que representa la posición en que se encuentra la Hoja1 en las pestañas del libro; sobre este Objeto se utiliza el Método Copy y el parámetro After para mover la hoja después de la Hoja2 que se encuentra en la posición 2.
  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 sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.