Exportar datos a un nuevo libro de Excel

Hoy me han preguntado si se podían exportar datos (o una hoja) a un nuevo libro de Excel o a uno ya existente. ¡Pues claro!, con VBA se puede todo. Exportar datos de Excel a Excel es una de las tareas más útiles que pueden hacerse con Excel.

En este caso, para exportar una serie de datos de un libro que tenemos (MyBook) a uno nuevo que crearemos (NuevoLibro) la sintaxis es muy sencilla:

SINTAXIS

1.Declaración de variables

Dim Libro1 As String
Dim NuevoLibro As String
Dim MyRange As Range

2.Obtención del nombre de mi libro desde donde exporte y del rango que voy a exportar

Libro1 = ActiveWorkbook.Name
Set MyRange = Sheets(1).Range("A1:Z100")

3.Creación de un nuevo libro y obtención del nombre de este nuevo libro.

Workbooks.Add
NuevoLibro = ActiveWorkbook.Name

4.Copiado del rango del libro que queremos exportar

MyRange.Copy

5.Pegado del rango que hemos copiado en mi nuevo libro

Workbooks(NuevoLibro).Activate
Sheets(1).Activate
Range("a1").Select 'Esquina superior izquierda de donde estará el rango que voy a pegar
ActiveSheet.Paste

Todos estos pasos en una macro te permitirán exportar un rango (o una hoja) a un nuevo libro de Excel.

(Visited 29.118 times, 1 visits today)
Categorías VBA

Uso de cookies

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información ACEPTAR

Aviso de cookies