Cómo acceder a una consulta de eliminación de VBA

Saber cómo eliminar datos de una tabla en Microsoft Office Access mediante una consulta de eliminación puede ahorrar tiempo si es necesario eliminar los datos de varias tablas. El acceso es un sistema de gestión de base de datos relacional incluido en el paquete de Microsoft Office. Visual Basic para Aplicaciones (VBA) es un lenguaje de programación utilizado para automatizar tareas rutinarias, tales como la eliminación de registros de las tablas. En unos pocos pasos, se puede escribir código VBA para crear una tabla, agregar dos registros y eliminar uno de esos discos.

Instrucciones

1 Iniciar Access de Microsoft Office 2007 y haga clic en "Base de datos en blanco", a continuación, seleccione "Crear". Haga clic en "Herramientas de base de datos" y seleccione "Visual Basic". Seleccione el menú "Insertar" y haga clic en "módulos".

2 Copia y pega el código siguiente para crear una nueva tabla, agregue dos registros y eliminar el registro donde "calle" es igual a "Principal".

Private Sub deleteQuery ()

Dim como secuencia sqlstr

sqlstr = "CREATE TABLE addressTbl (TEXTO HouseNumber (25), TEXTO Calle (25));"

DoCmd.RunSQL (sqlstr)

sqlstr = "INSERT INTO addressTbl ([HouseNumber], [la calle])"

sqlstr = sqlstr y "VALUES ( '2541', 'Lancaster');"

DoCmd.SetWarnings falsos

DoCmd.RunSQL (sqlstr)

sqlstr = "INSERT INTO addressTbl ([HouseNumber], [la calle])"

sqlstr = sqlstr y "VALUES ( '2458', 'principal');"

DoCmd.SetWarnings falsos

DoCmd.RunSQL (sqlstr)

sqlstr = "Eliminar addressTbl.HouseNumber, addressTbl.Street"

sqlstr = sqlstr Y "DE addressTbl"

sqlstr = sqlstr & "WHERE (((addressTbl.Street) =" principal "));"

DoCmd.RunSQL (sqlstr)

End Sub

3 Pulse la tecla "F5" para ejecutar la subrutina.