For some reason SetFocus is not working, it goes to the next control
Private Sub DateOfBirth_AfterUpdate()
If Not IsNull(Me.DateOfDeath) Then
If Me.DateOfBirth >= Me.DateOfBirth Then
MsgBox "Date of Birth must be smaller than Date of Death", , "Date Of Birth"
Me.DateOfBirth.Value = ""
In Microsoft Access, learn the trick to repeating sub-report headings at the top of each page.
The problem with sub-reports and headings:
Add a dummy group to the sub report using the expression =1:
Set the “Repeat Section” property of the dummy…
How can you see what you are working on when you want to see it while you to save a copy?
Add a "Save As" icon to the Quick Access Toolbar, or QAT.
That way, when you save a copy of a query, form, report, or other object you are modifying, you…