Tecnología

Inicio

Cómo acceder a VBA para crear una hoja de cálculo de Excel

Cómo acceder a VBA para crear una hoja de cálculo de Excel


Creación de una hoja de cálculo de Excel en Access le puede ahorrar tiempo cuando se necesita para exportar datos a una hoja de cálculo de Excel. Visual Basic para Aplicaciones (VBA) puede ser una herramienta poderosa para automatizar procesos en aplicaciones de Microsoft Office. Con VBA puede utilizar el objeto de aplicación de Microsoft Excel para crear una hoja de cálculo de Excel desde Access. El objeto de la aplicación Excel es el punto de entrada al resto del modelo de objetos. Exportar datos a Excel más rápidos por guardar los datos directamente a una hoja de cálculo de Excel.

Instrucciones

1 Lanzar Microsoft Office Access, haga clic en "Base de datos en blanco" y haga clic en el botón "Crear" para crear una base de datos en blanco. Haga clic en la pestaña "Herramientas de base de datos" y haga clic en "Visual Basic" para abrir la ventana de Visual Básico Microsoft. Haga clic en el menú "Insertar" y haga clic en "Módulo" para insertar un nuevo módulo de código.

2 Haga clic en el menú "Herramientas" y haga clic en "Referencias". Desplácese hacia abajo y seleccione la casilla junto a "Microsoft Excel <número de versión> Biblioteca de objetos." Haga clic en Aceptar."

3 Para empezar, escriba el siguiente código VBA para crear un nuevo procedimiento de substitución:

Private Sub createSpreadSheet ()

4 Continuar escribiendo el siguiente código para crear tres nuevos objetos variables que serán utilizadas para crear la hoja de cálculo Excel:

Dim newExcelApp As Excel.Application

Dim newWbk Como Excel.Workbook

Dim newWkSheet Como Excel.Worksheet

5 Agregue el código siguiente para iniciar Excel y mostrarlo:

Set newExcelApp = Excel.Application

newExcelApp.Visible = True

6 Escribe lo siguiente para agregar un nuevo libro y una hoja de cálculo:

Set newWbk = newExcelApp.Workbooks.Add

Establecer newWkSheet = newWbk.Worksheets (1)

7 Añadir datos a su nueva hoja de cálculo escribiendo lo siguiente:

newWkSheet.Cells (1, 1) .Value = "Nueva hoja de trabajo ..."

8 Guarde el nuevo libro creado escribiendo el siguiente código:

newWkSheet.SaveAs ("C:\myworksheet.xlsx")

9 Editar la ruta en el paso anterior y escriba la ruta y el nombre de su elección.

10 Escribe lo siguiente para finalizar el procedimiento substitución:

End Sub

11 Pulse la tecla "F5" para ejecutar el procedimiento y crear una nueva hoja de cálculo Excel.