Code pop-up to "yes"

[jeo]

Is there a way to code an answer “yes” on a delete/append query?
I want to avoid a user having to push yes, yes, yes when I run one of my reports.
There has to be a way to code around that, so all a user sees is a report once everything is done running.
Thanks.

 

[KenHigg]

Why does the report prompt the user for 'yes'?

kh

 

[Mile-O]

Use VBA to turn the warnings off like this:

With DoCmd
    .SetWarnings False
    .OpenQuery "YourQueryHere"
    .SetWarnings True
End With

 

[KenHigg]

Hum...

I thought it prompted once for the entire query...

kh

 

[Mile-O]

I thought it prompted once for the entire query...

Na:

You are about to run an append query. Continue?

You are about to append 2324 record(s). Continue?

 

[jeo]

Here is what I'm trying to turn off/code to yes - see attachment

 

[jeo]

So do I use this code for the On_Click event?
With DoCmd
.SetWarnings False
.OpenQuery "YourQueryHere"
.SetWarnings True
End With
And one more thing...is this doable when you run a Macro as well?

 

[Mile-O]

Yes. Just remember to change YourQueryHere to the name of the action query.

 

[jeo]

I got it...
And I figured out for the Macro, you do a .RunMacro("MacroName")
Thank you very, very much for all your help and your quick response!