Vamos a continuar con la aplicación del objeto Workbook utilizando sus Métodos y en esta ocasión veremos cómo se puede programar una macro para activar la ventana Guardar como… mediante la cual podemos guardar una copia del libro actual indicando la ruta donde queremos dejar dicha copia, es decir, sin necesidad de abrir la ventana de opciones de Guardar Como. Para lograr esto, vamos a utilizar el Método SaveAs.
Cómo crear una copia de un libro de Excel.
Método SaveCopyAs: Con la aplicación de este método, lo que estamos indicando desde VBA es la opción de Guardar una copia del libro de Excel en la ruta donde se requiera. Al guardar una Copia, significa que seguiremos trabajando en el libro de trabajo original y solo estamos generando una copia del libro a manera de Backup.
Desde Excel abrimos el Editor VBA (Alt + F11), insertamos un Módulo (Clic derecho sobre el proyecto Excel, Insertar, Módulo:
Ingresamos el siguiente código:
Sub MetodoGuardarCopia()
ThisWorkbook.SaveCopyAs "C:\Copia de 2.2.3 Macro para Guardar copia.xlsm"
End Sub
Queda de la siguiente manera en el Módulo:
Veamos lo que significan cada una de las líneas:
- La primera línea Sub MetodoGuardarCopia(), indica el inicio de la macro.
- En la segunda línea estamos utilizando del Objeto Workbooks el Método SaveCopyAs el cual nos permite Guardar una copia del libro de Excel en la ruta que indicamos entre comillas.
- La última línea marca el fin (End) de la Macro o Subrutina (Sub).
Al ejecutar la macro, veremos cómo se guarda el libro; probemos asignando la macro a una autoforma con clic derecho Asignar macro:
En la ventana de asignación de macros seleccionamos la macro MetodoGuardarCopia, damos Aceptar y probemos dando clic en el botón para ver que efectivamente una copia en la ruta especificada.
Recomendados.