Borrar registros usando la sentencia SQL DELETE en VBA

sql-delete-vba

Escrito por Administrador

10 de noviembre de 2021

Hoy vamos a aprender a borrar registros de una tabla usando la sentencia SQL DELETE en VBA. ¡Es muy fácil!

He preparado un ejemplo muy completo, con el que podremos añadir registros a una tabla y, posteriormente, borrarlos uno a uno seleccionándolos desde un formulario.

En el archivo (que se encuentra adjunto más abajo), encontraréis una tabla llamada "Empleados" y dos formularios llamados "Añadir empleados" y "Eliminar empleados".

solo-letras-vba
solo-letras-vba
solo-letras-vba

Vamos a centrarnos en el formulario "Eliminar empleados", que es el que nos interesa en este post.

Para borrar un registro introducido, seleccionaremos en el desplegable del campo "Apellidos" el empleado a borrar de la base de datos.

Una vez seleccionado, se recupera automáticamente el nombre de dicho trabajador en el campo "Nombre". Este campo está bloqueado porque solo recupera información a partir de los apellidos, usando el comando DLookUp como ya vimos en otro post.

Private Sub Apellidos_AfterUpdate()

'Recuperamos el nombre del empleado a partir de los apellidos

Form!Nombre = DLookup("Nombre", "Empleados", "Apellidos=Form!Apellidos")

End Sub

solo-letras-vba

El código a implementar en el botón Eliminar para borrar el registro seleccionado es el siguiente,

Private Sub Eliminar_Click()

'Borramos el empleado seleccionado de la tabla Empleados

Dim dbs As DAO.Database

Set dbs = CurrentDb()

dbs.Execute "DELETE from Empleados Where apellidos='" & Form!Apellidos & "'"

'Limpiamos los campos

Form!Nombre = ClearContents
Form!Apellidos = ClearContents

End Sub

Si pulsamos ahora el botón Eliminar, la información del empleado seleccionado será borrada de la tabla "Empleados".

solo-letras-vba

Espero que con este ejemplo hayas aprendido a borrar registros de una tabla usando la sentencia SQL DELETE en VBA.

Por último, os dejo dos enlaces donde explico cómo insertar registros usando la sentencia SQL INSERT en VBA y cómo actualizar registros usando la sentencia SQL UPDATE en VBA, por si os interesa.

Un saludo y hasta la próxima.

Descarga el archivo del ejemplo

Por favor, ayúdame y haz clic en el anuncio. Solo te lleva un segundo 😉

 


0 comentarios

Enviar un comentario

Tu dirección de correo electrónico no será publicada.

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.

Quizá te interese,

Contacto