Runing action queries through VBA

[Nevy]

Hi, I want to run two queries, one to delete, the other to apprend.

If I call them qryAppendX and qyrDeleteX.

How can I run them using the code?

Can I simply write:

DoCmd.OpenQuery "qyrDeleteX"
...
DoCmd.OpenQuery "qryAppendX"
...

Thanks

 

[modest]

Dim qry As DAO.QueryDef
Set qry = CurrentDb.QueryDefs("Query Name Here")
qry.Execute
----------------------------
You can also do it using sql:
CurrentDb.Execute "INSERT * INTO [TABLE NAME] FROM [OTHER TABLE]"
-or-
DoCmd.RunSQL "INSERT * INTO [TABLE NAME] FROM [OTHER TABLE]"

but I think .Execute runs the quickest