In this video we are going to cover the following MS Access VBA Control Events:
AfterUpdate
BeforeUpdate
NotInList
This is part 2 of a 3 part video series.
Private Sub cboBookTitles_NotInList(NewData As String, Response As Integer) Dim strMsg As String Dim strForm As String strForm = "frmAddBookTitle" strMsg = "Sorry, '" & NewData & "' is not a current book title. Would you like to add it?" Select Case MsgBox(strMsg, vbYesNo, "Add Book?") Case vbYes 'NewData is the data entered into the combo box DoCmd.OpenForm strForm, , , , acFormAdd, acDialog, NewData 'Suppress the Access error message Response = acDataErrAdded DoCmd.Close acForm, strForm Case vbNo MsgBox "You must select an item from the list or add a new one.", vbExclamation, "Information" 'Return the Access error message Response = acDataErrContinue End Select End Sub Private Sub txtAddress_AfterUpdate() MsgBox "Change was completed" End Sub Private Sub txtAddress_BeforeUpdate(Cancel As Integer) If MsgBox("Save Changes?", vbYesNo) = vbNo Then Cancel = True MsgBox "Change will not be saved." End If End Sub
<< MS Access VBA Control Events – PT1 | MS Access VBA Control Events – PT3 >>
Learn Access VBA: Understand Tables, Queries, Forms, and Reports
Learn Access VBA: From Zero to Database Hero If you’ve ever opened Microsoft Access and wondered how all the pieces fit together — tables, queries, forms, and reports — this tutorial is made for you. In just a few minutes, you’ll understand how Access works behind the scenes and see how VBA (Visual Basic for […]
How to Fix Run Time Error 1004 in Excel
If you work with Microsoft Excel frequently, chances ar ling for a solution. Fortunately, this error is well-documented, and there are several ways to resolve it. In this article, we’ll explore the causes of run time error 1004, practical steps to fix it, and preventive measures to reduce the chances of it happening again. What […]
Error 91: Object Variable or With Block Variable Not Set — Causes and Solutions
If you work with VBA (Visual Basic for Applications) in Excel, Access, Word, or other Microsoft Office programs, you’ve probably come across the dreaded Error 91 at least once: Run-time error ‘91’: Object variable or With block variable not set This error can be frustrating, especially if your code seems perfectly fine at first glance. […]
How To Escape Apostrophe In SQL Update Query
If you are looping a table with thousands of records, you’ll probably run into at least one that has an apostrophe in the field name. Like “Mike’s” or “M’cormick”, or something else. Anyway, here is one way to escape the string when you are doing your update query. Option Compare Database Sub YDriveLoop() ‘4/23/24 erik@loeblcomservices.com […]
Support these sponsors: