Cómo introducir el lenguaje VBA

La experiencia práctica es una de las mejores maneras para introducirse en el Visual Basic para Aplicaciones (VBA) lenguaje. VBA es un lenguaje de programación disponible en todas las aplicaciones de Microsoft Office como Access y Excel. En Access, cuando se crea una nueva base de datos, normalmente se empieza por crear una tabla e insertar datos en ella. Este proceso puede ser fácilmente automatizado a través de que el usuario de VBA. En Excel, puede automatizar tareas por primera grabación de macros VBA. Puede modificar una macro VBA para satisfacer sus necesidades después de haber sido registrado. conseguir serpiente no

Lo que necesita

Microsoft Office

Inicie Microsoft Access, haga clic en "Base de datos en blanco", y haga clic en el botón "Crear" para crear una nueva base de datos. Haga clic en "Herramientas de base de datos" y haga clic en "Visual Basic" para iniciar el editor de VBA. Haga clic en el menú "Insertar" y haga clic en "módulos" para insertar un nuevo módulo de código.

Copia y pega el código siguiente para crear una tabla e insertar una fila de datos utilizando sentencias SQL:

CrearTabla Sub Private ()

StrSQL Dim As String

strSQL = "CREATE TABLE MyTbl (fname TEXTO, TEXTO lName)"

DoCmd.RunSQL (strSQL)

strSQL = "INSERT INTO VALORES MyTbl ('John', 'SMITH')"

DoCmd.SetWarnings False

DoCmd.RunSQL (strSQL)

End Sub

Pulse la tecla "F5" para ejecutar el procedimiento.

Lanzamiento de Microsoft Excel, haga clic en la pestaña "desarrolladores" y haga clic en "Grabar macro" para comenzar a grabar una macro VBA. Haga clic en "OK" en la ventana de diálogo "Grabar macro". Tipo "2" en A1 y "4" en "B1". Haga clic en "Detener grabación" y haga clic en "Visual Basic" para iniciar el editor de VBA.

Expanda la carpeta "Módulos" y haga doble clic en "Module 1" para ver el siguiente código de macro:

Range ("A1"). Seleccione

ActiveCell.FormulaR1C1 = "2"

Range ("B1"). Seleccione

ActiveCell.FormulaR1C1 = "4"

Agregue el código siguiente a la macro para mostrar la suma de A1 y B1 en C1:

Dim a As Integer

B As Integer

Total de As Integer

Range ("A1"). Seleccione

un Range = ("A1"). Valor

Range ("B1"). Seleccione

b = Range ("B1"). Valor

Total = a + b

Range ("C1"). Seleccione

ActiveCell.FormulaR1C1 = total de

Pulse la tecla "F5" para ejecutar el código VBA macro.