Access: Stop the popup messages

[gheyman]

How do I stop the messages that come with the make table and append table queries? I thought it was SetWarnings = False

I tried different places with no luck - the code errors

Private Sub Form_Load()
'open home page
On Error GoTo Form_Load_Err


    DoCmd.OpenQuery "qry_1a_Find_New_QuoteNumbers", acViewNormal, acEdit
    '    DoCmd.SetWarnings = False
    DoCmd.Close acQuery, "qry_1a_Find_New_QuoteNumbers"
    DoCmd.OpenQuery "qry_1b_ppend_New_Quotes", acViewNormal, acEdit
    DoCmd.Close acQuery, "qry_1b_ppend_New_Quotes"


Form_Load_Exit:
    Exit Sub

Form_Load_Err:
    MsgBox Error$
    Resume Form_Load_Exit

End Sub

 

[Joe4]

Put it before you very first query (and make sure it is not commented out!).
Also, there is no equal sign with it.
See: https://docs.microsoft.com/en-us/office/vba/api/access.docmd.setwarnings

 

[gheyman]

Thanks. So it was the equal sign that screwed up. I had it first at one point.

Thank You

 

[Joe4]

Yeah, in bouncing back and forth between Excel and Access, I often also sometimes confuse DisplayAlerts with SetWarnings and equals sign or no no equals sign.