Tabla de contenido:
Video: Como usar una macro en todos tus libros de excel | #TopsdeExcel 2024
A veces puede querer o necesitar crear un libro de Excel de manera automatizada. Por ejemplo, puede que necesite copiar datos de una tabla y pegarlos en un libro de trabajo recién creado. La siguiente macro copia un rango de celdas de la hoja activa y pega los datos en un nuevo libro de trabajo.
Cómo funciona la macro
Como verá cuando lea las líneas del código, esta macro es relativamente intuitiva:
Sub Macro1 () 'Paso 1 Copie las hojas de datos ("Ejemplo 1"). Rango ("B4: C15"). Copie 'Paso 2 Cree un nuevo libro de trabajo Libros de trabajo. Agregue 'Paso 3 Pegue los datos de ActiveSheet. Pegar Destino: = Rango ("A1") 'Paso 4 Desactiva la aplicación de alertas de aplicaciones. DisplayAlerts = False 'Paso 5 Guarde el libro de trabajo recién creado ActiveWorkbook. SaveAs _ Nombre de archivo: = "C: TempMyNewBook. Xlsx" 'Paso 6 Devuelve las alertas de aplicación a la aplicación. DisplayAlerts = True End Sub
En el Paso 1, simplemente copie los datos que van desde las celdas B4 a C15. Tenga en cuenta que especifica tanto la hoja como el rango por nombre. Este enfoque es una mejor práctica cuando se trabaja con múltiples libros abiertos.
En el Paso 2, usa el método Agregar del objeto Libro de trabajo para crear un libro de trabajo. El libro de trabajo en blanco equivale a elegir manualmente Archivo → Nuevo → Documento en blanco en la cinta de Excel.
En el Paso 3, usa el método Pegar para enviar los datos copiados a la celda A1 del nuevo libro de trabajo.
Preste atención al hecho de que el código se refiere al objeto ActiveSheet. Cuando agrega un libro de trabajo, el nuevo libro de trabajo gana enfoque inmediatamente, convirtiéndose en el libro activo. (Excel hace lo mismo cuando agrega un libro de trabajo manualmente.)
En el paso 4 del código, configura el método DisplayAlerts en False, desactivando las advertencias de Excel. Hace esto porque en el siguiente paso del código, guarda el libro de trabajo recién creado. Puede ejecutar esta macro varias veces, en cuyo caso Excel intenta guardar el archivo varias veces.
¿Qué sucede cuando intenta guardar un libro de trabajo varias veces? Correcto: Excel le advierte que ya hay un archivo con ese nombre y luego le pregunta si desea sobrescribir el archivo existente anteriormente. Como su objetivo es automatizar la creación del libro, desea suprimir esa advertencia.
En el paso 5, guarde el archivo utilizando el método SaveAs. Tenga en cuenta que ingresa la ruta completa de la ubicación de guardado, incluido el nombre del archivo final.
Como desactivó las modificaciones de la aplicación en el Paso 4, debe volver a activarlas (consulte el Paso 6). Si no lo hace, Excel continúa suprimiendo todas las advertencias durante la sesión actual.
Cómo usar la macro
Para implementar esta macro, puede copiarla y pegarla en un módulo estándar:
-
Activar el Editor de Visual Basic presionando Alt + F11.
-
Haga clic con el botón derecho en el nombre del proyecto / libro de trabajo en la ventana del proyecto.
-
Elija Insertar → Módulo.
-
Escriba o pegue el código en el módulo recién creado.
Probablemente necesites cambiar el nombre de la hoja, la dirección del rango y la ubicación para guardar.