Open Event

[kingsgambit]

I found this code in the forum

Dim intCount

intCount = DCount("FieldName", "Table/QueryName")

If intCount > 0 Then
MsgBox "There are " & intCount & " records that expire in 30 days.", vbInformation, "Tax or Mot Expire Warning"
End If

Can you get a form to open before it runs this code.
The code is in the OnOen event of the switchboard, but the message comes up before the switchboard opens

 

[ChrisO]

Attached is a small demo, in A97, of delaying the Form Open event.

Hope that helps.

Regards
Chris